Index: TODO
===================================================================
diff -u -r991f6b6fde382a9bb5c3c9232206988813a3eb37 -rbe40ed6447e73f71e90fe1510ec01787cc799e6b
--- TODO	(.../TODO)	(revision 991f6b6fde382a9bb5c3c9232206988813a3eb37)
+++ TODO	(.../TODO)	(revision be40ed6447e73f71e90fe1510ec01787cc799e6b)
@@ -2310,6 +2310,7 @@
 
 - use NsfCommandPreserve/NsfCommandRelease for tcd->aliasCmd as well.
   In case of epoched cmdPointers, refetch the cmd and it client data.
+- add regression test
 
 TODO:
 
Index: tests/alias.test
===================================================================
diff -u -r991f6b6fde382a9bb5c3c9232206988813a3eb37 -rbe40ed6447e73f71e90fe1510ec01787cc799e6b
--- tests/alias.test	(.../alias.test)	(revision 991f6b6fde382a9bb5c3c9232206988813a3eb37)
+++ tests/alias.test	(.../alias.test)	(revision be40ed6447e73f71e90fe1510ec01787cc799e6b)
@@ -547,4 +547,22 @@
   ? {bar 3 4} 0-3-47
 }
 
-puts stderr ===EXIT
\ No newline at end of file
+#
+# test redefinition of a target proc
+#
+Test parameter count 1
+Test case alias-proc-refetch {
+
+  #
+  # initial definition 
+  #
+  proc target {} {return 1}
+  nx::Object create o {:public alias foo ::target}
+  ? {o foo} 1
+
+  #
+  # redefinition
+  #
+  proc ::target {} {return 2}
+  ? {o foo} 2
+}