From f4e3f1d4c5e0fb4af5370f91fa70d0604bc44149 Mon Sep 17 00:00:00 2001
From: Miguel Sofer <miguel.sofer@gmail.com>
Date: Mon, 14 Jul 2008 01:27:25 +0000
Subject: 	* generic/tclVar.c: fix error message

---
 ChangeLog        | 2 ++
 generic/tclVar.c | 4 ++--
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 8c82766..e1a3d7c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2008-07-14  Miguel Sofer  <msofer@users.sf.net>
 
+	* generic/tclVar.c: fix error message
+	
 	* generic/tclParse.c: 
 	* tests/parse.test:   remove unnecessary numLevel management 
 	[Bug 2017583]
diff --git a/generic/tclVar.c b/generic/tclVar.c
index 6279064..8670c24 100644
--- a/generic/tclVar.c
+++ b/generic/tclVar.c
@@ -16,7 +16,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclVar.c,v 1.163 2008/06/06 19:46:37 andreas_kupries Exp $
+ * RCS: @(#) $Id: tclVar.c,v 1.164 2008/07/14 01:27:25 msofer Exp $
  */
 
 #include "tclInt.h"
@@ -3945,7 +3945,7 @@ Tcl_VariableObjCmd(
     Tcl_Obj *varNamePtr, *tailPtr;
 
     if (objc < 2) {
-	Tcl_WrongNumArgs(interp, 1, objv, "?name value...? name ?value?");
+	Tcl_WrongNumArgs(interp, 1, objv, "?name value ...? name ?value?");
 	return TCL_ERROR;
     }
 
-- 
cgit v0.12