[Tclresource-commits] Source tclResourceOSX.c,1.15,1.16
Status: Beta
Brought to you by:
bdesgraupes
From: Bernard D. <bde...@us...> - 2004-09-07 12:59:46
|
Update of /cvsroot/tclresource/Source In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19790 Modified Files: tclResourceOSX.c Log Message: Msg for -force option Index: tclResourceOSX.c =================================================================== RCS file: /cvsroot/tclresource/Source/tclResourceOSX.c,v retrieving revision 1.15 retrieving revision 1.16 diff -u -d -r1.15 -r1.16 --- tclResourceOSX.c 7 Sep 2004 10:38:48 -0000 1.15 +++ tclResourceOSX.c 7 Sep 2004 12:59:28 -0000 1.16 @@ -1966,11 +1966,9 @@ */ sprintf(errbuf,"%d", rsrcId); - - Tcl_AppendStringsToObj(resultPtr, "the resource ", - errbuf, " already exists, use \"-force\"", - " to overwrite it.", (char *) NULL); - + Tcl_AppendStringsToObj(resultPtr, "the resource ", errbuf, + " already exists, use the \"-force\" option to overwrite it.", (char *) NULL); + result = TCL_ERROR; goto writeDone; } else if (GetResAttrs(resource) & resProtected) { |