From 20f6d7692617106255d80d3dec8d6a806ef05d3b Mon Sep 17 00:00:00 2001 From: Tim Edwards Date: Thu, 11 Nov 2021 08:42:46 -0500 Subject: [PATCH] Corrected the "format" command, which failed to return TCL_OK after executing the command with non-zero options. --- VERSION | 2 +- tcltk/tclnetgen.c | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/VERSION b/VERSION index c0ec95d..2593151 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -1.5.208 +1.5.209 diff --git a/tcltk/tclnetgen.c b/tcltk/tclnetgen.c index 6446ae2..f933bb8 100644 --- a/tcltk/tclnetgen.c +++ b/tcltk/tclnetgen.c @@ -2066,6 +2066,7 @@ _netcmp_format(ClientData clientData, Tcl_WrongNumArgs(interp, 1, objv, "[col1_width [col2_width]]"); return TCL_ERROR; } + return TCL_OK; } /*------------------------------------------------------*/