Index: generic/nsf.c
===================================================================
diff -u -rb5b08b9cc2fea92762787311da318d49d77d2a7b -rd168a26bce713de8daa5bbe79d740926e961c5bc
--- generic/nsf.c	(.../nsf.c)	(revision b5b08b9cc2fea92762787311da318d49d77d2a7b)
+++ generic/nsf.c	(.../nsf.c)	(revision d168a26bce713de8daa5bbe79d740926e961c5bc)
@@ -10561,7 +10561,7 @@
                          int withObjscope, int withPer_object) {
   Tcl_ListObjAppendElement(interp, listObj, object->cmdName);
   if (withPer_object) {
-    Tcl_ListObjAppendElement(interp, listObj, Tcl_NewStringObj("object", 6));
+    Tcl_ListObjAppendElement(interp, listObj, Tcl_NewStringObj("class-object", 12));
   }
   Tcl_ListObjAppendElement(interp, listObj, Tcl_NewStringObj(registerCmdName, -1));
   if (withObjscope) {