Index: tests/info-method.test
===================================================================
diff -u -re7a27ff80df0f9c20be649e1ea1d0bc55f045739 -r7413d266916a491ff674489513351c89987366d7
--- tests/info-method.test	(.../info-method.test)	(revision e7a27ff80df0f9c20be649e1ea1d0bc55f045739)
+++ tests/info-method.test	(.../info-method.test)	(revision 7413d266916a491ff674489513351c89987366d7)
@@ -173,7 +173,7 @@
 # Test visability of obj-objects 
 #
 
-nx::Test case sub-objects {
+nx::Test case visability-sub-objects {
   ::nx::Object create o {
     ::nx::Object create [::nx::self]::sub {
       :method foo {} {;}
@@ -192,18 +192,24 @@
 #
 # Test visability of aliased Objects
 #
-nx::Test case sub-objects {
+nx::Test case visability-aliased-object {
   ::nx::Object create ::I
   ::nx::Class create C {
     :public alias i ::I
     :create c1
   }
   ? {C info methods i} ""
   ? {c1 info lookup methods i} ""
+  #? {C info methods i} "i"
+  #? {c1 info lookup methods i} "i"
+  #? {C info methods *i} "i"
+  #? {c1 info lookup methods *i} "i"
 
   ::nsf::object::property ::I allowmethoddispatch 1
   ? {C info methods i} "i"
   ? {c1 info lookup methods i} "i"
+  ? {C info methods *i} "i"
+  ? {c1 info lookup methods *i} "i"
 }
 
 
@@ -603,7 +609,6 @@
   ? {lsort [o info method submethods dummy]} ""
   ? {lsort [o info method submethods foo]} "a b"
   ? {lsort [o info method submethods "foo a"]} ""
-
   ? {lsort [C info method submethods "bar"]} "a b baz"
   ? {lsort [C info method submethods "bar a"]} ""
   ? {lsort [C info method submethods "bar baz"]} "x y"