Index: library/lib/nx-test.tcl
===================================================================
diff -u -r6d36b205a4dfefe47b71b35cae9e98b763edeb28 -r4bc60e16c10fdbbb640b3019d4bdebdc469fdf55
--- library/lib/nx-test.tcl	(.../nx-test.tcl)	(revision 6d36b205a4dfefe47b71b35cae9e98b763edeb28)
+++ library/lib/nx-test.tcl	(.../nx-test.tcl)	(revision 4bc60e16c10fdbbb640b3019d4bdebdc469fdf55)
@@ -49,7 +49,7 @@
     }
     :public object method destroy {} {
       lappend msg \
-	  file [file rootname [file tail ${:testfile}]] \
+	  Test-set [file rootname [file tail ${:testfile}]] \
 	  tests [expr {${:success} + ${:failure}}] \
 	  success ${:success} \
 	  failure ${:failure} \