Changeset 18 for trunk/lingosource/castlib2/HierarchicalMenuManager_1.ls

Timestamp:

10/24/08 12:12:09 (4 years ago)

Author:

alex

Message:

updated movie to incorporate new version of library scripts

File:

• trunk/lingosource/castlib2/HierarchicalMenuManager_1.ls (modified) (2 diffs)

trunk/lingosource/castlib2/HierarchicalMenuManager_1.ls

@@ -1 @@
--- Manager Behavior for Hierarchical Menu by Alex da Franca ©2004 da.Franca@online.de
+-- Manager Behavior for Hierarchical Menu by Alex da Franca c2004 da.Franca@online.de
 -----------------------------------------------------------------------------------
 --
@@ -1308 +1308 @@
     
     tscr = mGetXScript(#Alex_HierMenuParent)
-    if not(voidP(tscr)) then pMyHierMenu =  new(tscr)
+    if not(listP(tscr)) then
+      if ilk(tscr) = #instance then tscr = tscr.script
+      pMyHierMenu =  new(tscr)
+    end if
     
   end if