Added function to check if an IDE stack should appear in "Window" list

livecodepanos · livecodepanos · commit 75f7b92c0819 · 2018-04-19T15:27:43.000+01:00
diff --git a/Toolset/libraries/revidelibrary.8.livecodescript b/Toolset/libraries/revidelibrary.8.livecodescript
@@ -2249,6 +2249,15 @@ function revIDEStacksInUse
    return tData
 end revIDEStacksInUse
 
+function revIDEStackIsIDEWindow pStackName
+   if pStackName begins with revIDEScriptEditorPrefix() or pStackName is "revDictionary" \
+         or pStackName is "revResourceCenter" or pStackName is "revOnline" then
+      return true
+   end if
+   
+   return false
+end revIDEStackIsIDEWindow
+
 function revIDEAPIFilters
 end revIDEAPIFilters
 
@@ -9816,7 +9825,7 @@ User stacks, script editors, the dictionary and resource center are considered w
 from the point of view of the menubar
 */
 function revIDEStackIsWindow pStackName
-   if pStackName begins with revIDEScriptEditorPrefix() or pStackName is "revDictionary" or pStackName is "revResourceCenter" or pStackName is "revOnline" then
+   if revIDEStackIsIDEWindow(pStackName) then
       return true
    end if
    
diff --git a/Toolset/palettes/menubar/revmenubar.livecodescript b/Toolset/palettes/menubar/revmenubar.livecodescript
@@ -173,7 +173,7 @@ private on setupWindowMenu
    repeat for each line tStack in tWindows
       if there is not a stack tStack then next repeat
       put the short name of tStack into tStackName
-      if tStackName begins with "revNewScriptEditor" or tStackName is "revDictionary" or tStackName is "revResourceCenter" or tStackName is "revOnline" then
+      if revIDEStackIsIDEWindow(tStackName) then
          put the title of tStack into tStackName
       end if
       
