stuff

projects/oorexx/apps.rex

@@ -30,7 +30,6 @@ exit
   /* Use environment variable for HOME directly */
   home = SysGetpwnam("gmgauthier", "d")
   filename = home || '/Documents/memos/' || timestamp || '.md'
-  address system 'touch' filename
   address system 'tilde' filename
   return
 
@@ -110,7 +109,7 @@ exit
   max_x = winm~cols
 
   /* Create menu window - using proper 4 arguments for subwindow */
-  menu_height = 19
+  menu_height = 21
   menu_width = 40
   start_y = (max_y - menu_height) % 2
   start_x = (max_x - menu_width) % 2
@@ -137,9 +136,10 @@ exit
                          "  f. MC File Manager", -
                          "  i. Weechat IRC Client", -
                          "  p. Castero Podcasts", -
-                         "  m. VLC Music Player")
+                         "  m. VLC Music Player", -
+                         "  z. Fishy")
 
-  menu_keys = .array~of("w", "x", "e", "c", "a", "n", "t", "l", "f", "i", "p", "m")
+  menu_keys = .array~of("w", "x", "e", "c", "a", "n", "t", "l", "f", "i", "p", "m", "z")
 
   /* Display menu items */
   selected = 1
@@ -212,6 +212,7 @@ exit
     when key_char = 'i' then address system 'weechat'
     when key_char = 'p' then address system 'castero'
     when key_char = 'm' then address system 'vlc -Z -L -I ncurses --no-video --recursive expand' home'/Music'
+    when key_char = 'z' then address system 'fishy'
     otherwise nop
   end
   return
@@ -241,4 +242,4 @@ exit
 
 
 ::requires "ncurses.cls"
-::requires "rxunixsys" LIBRARY
+::requires "rxunixsys" LIBRARY