Index: tests/cget.test
===================================================================
diff -u -r275da34d3d7a874a451eced58242b738c8a37d1a -r3946480dcc906b5004bf18ee49b49054fa400e0d
--- tests/cget.test	(.../cget.test)	(revision 275da34d3d7a874a451eced58242b738c8a37d1a)
+++ tests/cget.test	(.../cget.test)	(revision 3946480dcc906b5004bf18ee49b49054fa400e0d)
@@ -237,8 +237,8 @@
   nx::Class create C
   C property p {
     set :valuechangedcmd {
-      #puts stderr "C.p valuechangedcmd $obj $var +1"
-      ::nsf::var::set $obj $var [expr [list [::nsf::var::set $obj $var] + 1]]
+      #puts stderr "==== C.p valuechangedcmd $obj $var +1"
+      ::nsf::var::set $obj $var [expr {[::nsf::var::set $obj $var] + 1}]
     }
   }
   
@@ -249,7 +249,7 @@
   ? {c1 configure -p 1} ""
   ? {c1 eval {info exists :p}} 1
   ? {c1 cget -p} "2"
-  
+
   #
   # class case with default
   #