You are viewing a plain text version of this content. The canonical link for it is here.

Posted to mod_dtcl-cvs@tcl.apache.org by da...@apache.org on 2001/11/14 15:50:36 UTC

cvs commit: tcl-moddtcl tcl_commands.c

davidw      01/11/14 06:50:36

  Modified:    .        tcl_commands.c
  Log:
  Quick fix to make command return correct value.
  
  Revision  Changes    Path
  1.20      +1 -1      tcl-moddtcl/tcl_commands.c
  
  Index: tcl_commands.c
  ===================================================================
  RCS file: /home/cvs/tcl-moddtcl/tcl_commands.c,v
  retrieving revision 1.19
  retrieving revision 1.20
  diff -u -r1.19 -r1.20
  --- tcl_commands.c	2001/10/15 10:44:09	1.19
  +++ tcl_commands.c	2001/11/14 14:50:36	1.20
  @@ -67,7 +67,7 @@
   	Tcl_AddErrorInfo(interp, Tcl_PosixError(interp));
   	return TCL_ERROR;
       }
  -    if (get_parse_exec_file(globals->r, dsc, filename, 0) == OK)
  +    if (get_parse_exec_file(globals->r, dsc, filename, 0) == TCL_OK)
   	return TCL_OK;
       else
   	return TCL_ERROR;