Index: library/lib/nx-test.tcl
===================================================================
diff -u -r85ee1fdb043ed3f82fd272cc004c476c40861fdb -r1f13a87d4a65e93d881102a690ae668e82918655
--- library/lib/nx-test.tcl	(.../nx-test.tcl)	(revision 85ee1fdb043ed3f82fd272cc004c476c40861fdb)
+++ library/lib/nx-test.tcl	(.../nx-test.tcl)	(revision 1f13a87d4a65e93d881102a690ae668e82918655)
@@ -77,10 +77,13 @@
       #   - no var cleanup
       #
       set :case $name 
+      nsf::log notice "Running test case: [info script] $name"
 
       if {[info exists arg]} {
 	foreach o [Object info instances -closure] {set pre_exist($o) 1}
+
 	namespace eval :: [list [current] eval $arg]
+
 	foreach o [Object info instances -closure] {
 	  if {[info exists pre_exist($o)]} continue
 	  if {[::nsf::object::exists $o]} {$o destroy}
@@ -203,6 +206,6 @@
   nsf::__db_run_assertions
 }
 
-nsf::log notice "Running test cases: [info script]"
 
 
+