Changeset 105 for trunk/lingosource

Timestamp:

12/16/07 22:41:38 (4 years ago)

Author:

alex

Message:

incorporated changes from the beta version, caching and sort by member

File:

• trunk/lingosource/castlib1/thisMoviesScript.ls (modified) (5 diffs)

trunk/lingosource/castlib1/thisMoviesScript.ls

@@ -74 +74 @@
   li = []
   mscr = []
+  currMScripts = []
+  
   pscr = []
+  currPScripts = []
+  
   bscr = []
-  
+  currBScripts = []
   
   li.add([#title: "Movie scripts", #items: mscr])
   li.add([#title: "Behavior scripts", #items: bscr])
   li.add([#title: "Parent scripts", #items: pscr])
+  
+  
   
   ---------------- menu divider for better readability:
@@ -113 +119 @@
                   mclnum = n
                   
-                  mscr.add([#title:"Castlib" && n &":", #items:[], #type:#divider])
+                  currMScripts = []
+                  -- mscr.add([#title:"Castlib" && n &":", #items:currMScripts, #type:#divider])
+                  mscr.add([#title:"Castlib" && n &":", #items:currMScripts, #name:"Castlib"&n])
                   
                 end if
                 ---------------- // menu divider
                 
-                mscr.add(thisScriptList)
+                currMScripts.add(thisScriptList)
               #parent:
                 
@@ -124 +132 @@
                 if pclnum <> n then
                   pclnum = n
-                  pscr.add([#title:"Castlib" && n &":", #items:[], #type:#divider])
+                  currPScripts = []
+                  -- pscr.add([#title:"Castlib" && n &":", #items:currPScripts, #type:#divider])
+                  pscr.add([#title:"Castlib" && n &":", #items:currPScripts, #name:"Castlib"&n])
                 end if
                 ---------------- // menu divider
                 
-                pscr.add(thisScriptList)
+                currPScripts.add(thisScriptList)
               #score:
                 
@@ -134 +144 @@
                 if bclnum <> n then
                   bclnum = n
-                  bscr.add([#title:"Castlib" && n &":", #items:[], #type:#divider])
+                  currBScripts = []
+                  -- bscr.add([#title:"Castlib" && n &":", #items:currBScripts, #type:#divider])
+                  bscr.add([#title:"Castlib" && n &":", #items:currBScripts, #name:"Castlib"&n])
                 end if
                 ---------------- // menu divider
                 
-                bscr.add(thisScriptList)
+                currBScripts.add(thisScriptList)
             end case
             
@@ -249 +261 @@
     defaultItem = [#title: "", #items: [], #scripttype: memref.scripttype, #memName:dername, #memNum:memref.membernum, #clibNum:memref.castlibnum, #sel:[1,1]]
     
+    if len < 1 then
+      -- we cache only the results, if there is no search word
+      -- otherwise we would need to cache the result for every different searchword
+      pCachedResults = xscr().mGetGlobalValue(#pCachedResults)
+      if ilk(pCachedResults) <> #proplist then
+        pCachedResults = [:]
+        xscr().mSetGlobalValue(#pCachedResults, pCachedResults)
+      end if
+      cached = pCachedResults.getaprop(string(memref))
+      if ilk(cached) = #proplist then
+        theDate = cached.getaprop(#theDate)
+        if theDate = memref.modifiedDate then
+          found = 1
+          thisScriptList.setaprop(#items, cached.getaprop(#items))
+        else
+          pCachedResults.deleteprop(string(memref))
+        end if
+      end if
+    end if
+    if found <> 1 then
     found = mParseScriptText(scrtext, theItems, defaultItem, kw, searchmode, len)
-    
+      if len < 1 then
+        pCachedResults = xscr().mGetGlobalValue(#pCachedResults)
+        if ilk(pCachedResults) <> #proplist then
+          pCachedResults = [:]
+          xscr().mSetGlobalValue(#pCachedResults, pCachedResults)
+        end if
+        pCachedResults.setaprop(string(memref), [#theDate:memref.modifiedDate, #items:duplicate(theItems)])
+      end if
+    end if
   end if