Index: generic/nsf.c
===================================================================
diff -u -r0c534a6693afbced7859c4189b62e712acc8f955 -r06ee7ba8b56117d63ad5ef251885efc92be5ddf5
--- generic/nsf.c	(.../nsf.c)	(revision 0c534a6693afbced7859c4189b62e712acc8f955)
+++ generic/nsf.c	(.../nsf.c)	(revision 06ee7ba8b56117d63ad5ef251885efc92be5ddf5)
@@ -1198,8 +1198,10 @@
     *regObject = referencedObject;
     *defObject = referencedObject;
     if (referencedObject == NULL) {
-      /* the cmd was not registered on an object or class */
-      cmd = NULL;
+      /* 
+       * The cmd was not registered on an object or class, but we
+       * still report back the cmd (might be e.g. a primitive cmd.
+       */
     }
   } else {
     *methodName1 = methodName;
@@ -11853,7 +11855,8 @@
 }
 
 static int
-ListChildren(Tcl_Interp *interp, NsfObject *object, CONST char *pattern, int classesOnly, NsfClass *type) {
+ListChildren(Tcl_Interp *interp, NsfObject *object, CONST char *pattern, 
+	     int classesOnly, NsfClass *type) {
   NsfObject *childObject;
   Tcl_HashTable *cmdTablePtr;
 
@@ -15776,7 +15779,7 @@
 			  dsPtr, &regObject, &defObject, &methodName1, &fromClassNS);
   /*fprintf(stderr,
 	  "NsfClassInfoMethodMethod object %p regObject %p defObject %p fromClass %d cmd %p\n",
-    &class->object,regObject,defObject,fromClassNS, cmd);*/
+	  &class->object,regObject,defObject,fromClassNS, cmd);*/
   result = ListMethod(interp,
 		      regObject ? regObject : &class->object,
 		      defObject ? defObject : &class->object,