From 4f0071c711c5893aab61fa80f7007c9c4985beba Mon Sep 17 00:00:00 2001 From: Greg Gauthier Date: Mon, 5 May 2025 20:27:13 +0100 Subject: [PATCH] reduce the delay times --- app/appui.cls | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/app/appui.cls b/app/appui.cls index 51a83f1..1853c19 100644 --- a/app/appui.cls +++ b/app/appui.cls @@ -152,7 +152,9 @@ RETURN end when key = D2C(10) | key = D2C(13) then do /* Enter key - numeric codes only */ + menuwin~mvaddstr(19 - 1, 18, "Letter selection ["||menu_keys[.environment~selected]||"]") menuwin~refresh + call SysWait 0.25 self~ProcessSelection(menuwin, menu_keys[.environment~selected]) return end @@ -163,7 +165,7 @@ if pos > 0 then do menuwin~mvaddstr(19 - 1, 18, "Letter selection ["||key||"]") menuwin~refresh - call SysWait 0.5 + call SysWait 0.25 self~ProcessSelection(menuwin, key) return end @@ -185,32 +187,32 @@ when key_char = 'a' then do menuwin~mvaddstr(19 - 3, 5, "I would launch the ADD panel "); menuwin~refresh - call SysWait 1 + call SysWait 0.25 END when key_char = 'r' then do menuwin~mvaddstr(19 - 3, 5, "I would launch the REMOVE panel "); menuwin~refresh - call SysWait 1 + call SysWait 0.25 END when key_char = 'e' then do menuwin~mvaddstr(19 - 3, 5, "I would launch the EDIT panel "); menuwin~refresh - call SysWait 1 + call SysWait 0.25 END when key_char = 's' then do menuwin~mvaddstr(19 - 3, 5, "I would launch the SEARCH panel "); menuwin~refresh - call SysWait 1 + call SysWait 0.25 END when key_char = 'l' then do menuwin~mvaddstr(19 - 3, 5, "I would launch the LIST panel ") menuwin~refresh - call SysWait 1 + call SysWait 0.25 END when key_char = 'q' then do menuwin~mvaddstr(19 - 3, 5, "Exiting The Application... "); menuwin~refresh - call SysWait 1 + call SysWait 0.25 menuwin~endwin .environment['STOPNOW'] = 1 END