Index: tests/nsf-cmd.test
===================================================================
diff -u -N -r1919d17fefad9446170fa6d532b439f494189b32 -r47f388cda74f1b4656389d4129b96435034ac4a4
--- tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision 1919d17fefad9446170fa6d532b439f494189b32)
+++ tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision 47f388cda74f1b4656389d4129b96435034ac4a4)
@@ -511,7 +511,27 @@
 
 }
 
+nx::test case nsf-proc-rename {
+  namespace eval ::ns1 {}
+  
+  nsf::proc ns1::foo {
+    {-x:required}
+  } { return 1-$x }
 
+  ? {ns1::foo -x ok} 1-ok
+  
+  rename ns1::foo ns1::foo.orig
+
+  nsf::proc ns1::foo {
+    {-x:required}
+  } { return 2-$x }
+
+  ? {ns1::foo -x ok} 2-ok
+
+  namespace delete ::ns1
+}
+
+
 #
 # Local variables:
 #    mode: tcl