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 2003/05/26 23:20:25 UTC

cvs commit: tcl-rivet/src rivetCore.c mod_rivet.c

davidw      2003/05/26 14:20:25

  Modified:    .        ChangeLog
               src      rivetCore.c mod_rivet.c
  Log:
  * src/rivetCore.c (Rivet_Headers): Change error message to better
    reflect that there is only one argument to 'headers numeric'.
    Thanks to "Dmitry Zuryanovich".
  
  * src/mod_rivet.c (Rivet_ParseExecFile): Updated Rivet_GetRivetFile
    and Rivet_GetTclFile to use the right arguments.
  
  Revision  Changes    Path
  1.118     +13 -0     tcl-rivet/ChangeLog
  
  Index: ChangeLog
  ===================================================================
  RCS file: /home/cvs/tcl-rivet/ChangeLog,v
  retrieving revision 1.117
  retrieving revision 1.118
  diff -u -r1.117 -r1.118
  --- ChangeLog	24 May 2003 08:43:29 -0000	1.117
  +++ ChangeLog	26 May 2003 21:20:24 -0000	1.118
  @@ -1,4 +1,17 @@
  +2003-05-26  David N. Welton  <da...@dedasys.com>
  +
  +	* src/rivetCore.c (Rivet_Headers): Change error message to better
  +	reflect that there is only one argument to 'headers numeric'.
  +	Thanks to "Dmitry Zuryanovich".
  +
  +	* src/mod_rivet.c (Rivet_ParseExecFile): Updated
  +	Rivet_GetRivetFile and Rivet_GetTclFile to use the right
  +	arguments.
  +
   2003-05-24  David N. Welton  <da...@dedasys.com>
  +
  +	* rivet/packages/tclrivet/tclrivet.tcl: Added commands that need
  +	to be filled in.
   
   	* tests/runtests.tcl: Use apachetest::need_modules.
   
  
  
  
  1.33      +2 -2      tcl-rivet/src/rivetCore.c
  
  Index: rivetCore.c
  ===================================================================
  RCS file: /home/cvs/tcl-rivet/src/rivetCore.c,v
  retrieving revision 1.32
  retrieving revision 1.33
  diff -u -r1.32 -r1.33
  --- rivetCore.c	14 Dec 2002 19:04:35 -0000	1.32
  +++ rivetCore.c	26 May 2003 21:20:25 -0000	1.33
  @@ -238,7 +238,7 @@
   
   	if (objc != 3)
   	{
  -	    Tcl_WrongNumArgs(interp, 2, objv, "response code");
  +	    Tcl_WrongNumArgs(interp, 2, objv, "response_code_number");
   	    return TCL_ERROR;
   	}
   	if (Tcl_GetIntFromObj(interp, objv[2], &st) != TCL_ERROR) {
  
  
  
  1.64      +5 -4      tcl-rivet/src/mod_rivet.c
  
  Index: mod_rivet.c
  ===================================================================
  RCS file: /home/cvs/tcl-rivet/src/mod_rivet.c,v
  retrieving revision 1.63
  retrieving revision 1.64
  diff -u -r1.63 -r1.64
  --- mod_rivet.c	13 May 2003 09:14:58 -0000	1.63
  +++ mod_rivet.c	26 May 2003 21:20:25 -0000	1.64
  @@ -217,10 +217,10 @@
   	{
   	    /* toplevel == 0 means we are being called from the parse
   	     * command, which only works on Rivet .rvt files. */
  -	    result = Rivet_GetRivetFile(filename, toplevel, outbuf, req);
  +	    result = Rivet_GetRivetFile(filename, toplevel, outbuf, interp);
   	} else {
   	    /* It's a plain Tcl file */
  -	    result = Rivet_GetTclFile(filename, outbuf, req);
  +	    result = Rivet_GetTclFile(filename, outbuf, interp);
   	}
   	if (result != TCL_OK)
   	{
  @@ -462,7 +462,8 @@
       }
   #endif
   
  -    if ((errstatus = ApacheRequest___parse(globals->req->apachereq)) != OK) {
  +    errstatus = ApacheRequest_parse(globals->req->apachereq);
  +    if (errstatus != OK) {
   	retval = errstatus;
   	goto sendcleanup;
       }
  
  
  

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