change a few StrLen to EstrLen

implement reopen function
dmcoles · Jul 5, 2024 · 0941266 · 0941266
1 parent b2a5b12
commit 0941266
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 4 deletions.
diff --git a/eSourceGen.e b/eSourceGen.e
@@ -851,16 +851,16 @@ PROC genWindowHeader(count, windowObject:PTR TO windowObject, menuObject:PTR TO
           StrAdd(menuFlags,'CHECKIT')
         ENDIF
         IF menuItem.toggle
-          IF StrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
+          IF EstrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
           StrAdd(menuFlags,'MENUTOGGLE')
         ENDIF
         IF menuItem.checked
-          IF StrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
+          IF EstrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
           StrAdd(menuFlags,'CHECKED')
         ENDIF
       ENDIF
       IF menuItem.disabled
-        IF StrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
+        IF EstrLen(menuFlags) THEN StrAdd(menuFlags,' OR ')
         IF menuItem.type=MENU_TYPE_MENU
           StrAdd(menuFlags,'NM_MENUDISABLED')
         ELSE
@@ -870,7 +870,7 @@ PROC genWindowHeader(count, windowObject:PTR TO windowObject, menuObject:PTR TO
 
       StringF(tempStr,'  menuData[\d].type:=\s',i,itemType)
       self.writeLine(tempStr)
-      IF StrLen(menuFlags)
+      IF EstrLen(menuFlags)
         StringF(tempStr,'  menuData[\d].flags:=\s',i,menuFlags)
         self.writeLine(tempStr)
       ENDIF

diff --git a/rebuild.e b/rebuild.e
@@ -2891,6 +2891,8 @@ PROC main() HANDLE
                       saveFile()
                     CASE MENU_PROJECT_SAVEAS ->Save As
                       saveFileAs()
+                    CASE MENU_PROJECT_REOPEN  ->Reopen file
+                      doLoad(recentFiles.item(subitem))
                     CASE MENU_PROJECT_GENCODE ->Generate Code
                       genCode()
                     CASE MENU_PROJECT_SHOWLIBS