Index: generic/nsf.tcl
===================================================================
diff -u -rdd7a26337aa9aec3e0a06d2137ee7e708a8e1a9a -r821c01bd241c51be4fa0931d423d8f8658606ee1
--- generic/nsf.tcl	(.../nsf.tcl)	(revision dd7a26337aa9aec3e0a06d2137ee7e708a8e1a9a)
+++ generic/nsf.tcl	(.../nsf.tcl)	(revision 821c01bd241c51be4fa0931d423d8f8658606ee1)
@@ -37,6 +37,16 @@
     }
   }
 
+  ::proc strip_proc_name {name} {
+    if {[string match ::nsf::procs::* $name]} {
+      return [string range $name 12 end]
+    } elseif {[string match nsf::procs::* $name]} {
+      return [string range $name 12 end]
+    } else {
+      return $name
+    }
+  }
+
   #
   # ::nsf::mixin 
   #