aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorWojciech A. Koszek <wkoszek@laptop.freebsd.czest.pl>2010-01-31 16:56:40 +0000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 11:02:58 +1000
commitb08820ef88b74b1902da24b06843cbca76a29df8 (patch)
tree6f5459873ca97d11304a755ee378858ae69c7335
parent68c4bc3d300d0b1e3d2edd2c5411e92cb103acf1 (diff)
downloadjimtcl-b08820ef88b74b1902da24b06843cbca76a29df8.zip
jimtcl-b08820ef88b74b1902da24b06843cbca76a29df8.tar.gz
jimtcl-b08820ef88b74b1902da24b06843cbca76a29df8.tar.bz2
If three arguments are passed to 'puts' and the second isn't -nonewline, return JIM_ERR instead of JIM_OK.
-rw-r--r--jim.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/jim.c b/jim.c
index 41f7666..5afabe2 100644
--- a/jim.c
+++ b/jim.c
@@ -10289,7 +10289,7 @@ static int Jim_PutsCoreCommand(Jim_Interp *interp, int argc, Jim_Obj *const *arg
if (argc == 3) {
if (!Jim_CompareStringImmediate(interp, argv[1], "-nonewline")) {
Jim_SetResultString(interp, "The second argument must " "be -nonewline", -1);
- return JIM_OK;
+ return JIM_ERR;
}
else {
fputs(Jim_GetString(argv[2], NULL), stdout);