Index: tests/nsf-cmd.test
===================================================================
diff -u -rd007a8d7283d2861e0de5cfe567d540b8bd801de -r5b91151679ab9da9dae7e2480f9d7152637f72b6
--- tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision d007a8d7283d2861e0de5cfe567d540b8bd801de)
+++ tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision 5b91151679ab9da9dae7e2480f9d7152637f72b6)
@@ -617,7 +617,7 @@
   namespace delete ::ns1
 }
 
-nx::test case nsf-proc-rename-delete {
+nx::test case nsf-proc-backstage-rename {
   namespace eval ::ns1 {}
   ? {info commands ::ns1::foo} ""
   ? {info commands ::nsf::procs::ns1::foo} ""
@@ -636,22 +636,72 @@
 
   ? {::ns1::foo -x ok} "1-ok"
 
-  rename [set x ::nsf::procs::ns1::foo] ""
+  rename ::nsf::procs::ns1::foo ""
 
   ? {info commands ::ns1::foo} "::ns1::foo"
   ? {info commands ::nsf::procs::ns1::foo} ""
   ? {info procs ::ns1::foo} ""
   ? {info procs ::nsf::procs::ns1::foo} ""
 
-  ? {::ns1::foo -x ok} {invalid command name "::ns1::foo"}
+  ? {::ns1::foo -x ok} {cannot lookup command '::nsf::procs::ns1::foo'}
 
+  rename ::ns1::foo ""
+
+  ? {info commands ::ns1::foo} ""
+  ? {info commands ::nsf::procs::ns1::foo} ""
+  ? {info procs ::ns1::foo} ""
+  ? {info procs ::nsf::procs::ns1::foo} ""
+
+  ? {::ns1::foo -x ok} {invalid command name "::ns1::foo"}
+  
   namespace eval ::ns1 {}
 }
 
+nx::test case nsf-proc-backstage-rename-2 {
+  namespace eval ::ns1 {}
+  ? {info commands ::ns1::foo} ""
+  ? {info commands ::nsf::procs::ns1::foo} ""
+  ? {info procs ::ns1::foo} ""
+  ? {info procs ::nsf::procs::ns1::foo} ""
 
-# - to-do interp hide/expose
+  ? {::ns1::foo -x ok} {invalid command name "::ns1::foo"}
+  
+  nsf::proc ::ns1::foo {
+    {-x:required}
+  } { return 1-$x }
+  ? {info commands ::ns1::foo} "::ns1::foo"
+  ? {info commands ::nsf::procs::ns1::foo} "::nsf::procs::ns1::foo"
+  ? {info procs ::ns1::foo} ""
+  ? {info procs ::nsf::procs::ns1::foo} "::nsf::procs::ns1::foo"
 
+  ? {::ns1::foo -x ok} "1-ok"
 
+  rename ::nsf::procs::ns1::foo ""
+  nx::Object create ::nsf::procs::ns1::foo
+
+  ? {info commands ::ns1::foo} "::ns1::foo"
+  ? {info commands ::nsf::procs::ns1::foo} "::nsf::procs::ns1::foo"
+  ? {info procs ::ns1::foo} ""
+  ? {info procs ::nsf::procs::ns1::foo} ""
+  
+  ? {::ns1::foo -x ok} {command '::nsf::procs::ns1::foo' is not a proc}
+
+  rename ::ns1::foo ""
+
+  ? {info commands ::ns1::foo} ""
+  ? {info commands ::nsf::procs::ns1::foo} "::nsf::procs::ns1::foo"
+  ? {info procs ::ns1::foo} ""
+  ? {info procs ::nsf::procs::ns1::foo} ""
+
+  ? {::ns1::foo -x ok} {invalid command name "::ns1::foo"}
+  
+  namespace eval ::ns1 {}
+  rename ::nsf::procs::ns1::foo ""
+}
+
+# - TO-DO: interp hide/expose
+
+
 #
 # Local variables:
 #    mode: tcl