You are viewing a plain text version of this content. The canonical link for it is here.
Posted to rivet-dev@tcl.apache.org by da...@apache.org on 2002/05/15 01:06:49 UTC

cvs commit: tcl-rivet/src TclWebapache.c

davidw      02/05/14 16:06:49

  Modified:    src      TclWebapache.c
  Log:
  Fixed little oopsy.
  
  Revision  Changes    Path
  1.29      +2 -2      tcl-rivet/src/TclWebapache.c
  
  Index: TclWebapache.c
  ===================================================================
  RCS file: /home/cvs/tcl-rivet/src/TclWebapache.c,v
  retrieving revision 1.28
  retrieving revision 1.29
  diff -u -r1.28 -r1.29
  --- TclWebapache.c	3 May 2002 17:27:14 -0000	1.28
  +++ TclWebapache.c	14 May 2002 23:06:49 -0000	1.29
  @@ -7,7 +7,7 @@
    * operations.
    */
   
  -/* $Id: TclWebapache.c,v 1.28 2002/05/03 17:27:14 davidw Exp $ */
  +/* $Id: TclWebapache.c,v 1.29 2002/05/14 23:06:49 davidw Exp $ */
   
   #include <tcl.h>
   
  @@ -187,7 +187,7 @@
       for (i = 0; i < parmsarray->nelts; ++i)
       {
   
  -	if (!strncmp(varname, TclWeb_StringToUtf(parms[i].key, req), strlen(varname)
  +	if (!strncmp(varname, TclWeb_StringToUtf(parms[i].key, req),
   		     strlen(varname) < strlen(parms[i].key) ?
   		     strlen(parms[i].key) : strlen(varname)))
   	{
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: rivet-dev-unsubscribe@tcl.apache.org
For additional commands, e-mail: rivet-dev-help@tcl.apache.org