From df0f49ad51e27621dcb6aa2dd26ef094b6b282d0 Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Fri, 21 Aug 2015 19:58:16 +0200 Subject: Keyboard shortcuts working --- osmenu.icl | 3 --- 1 file changed, 3 deletions(-) (limited to 'osmenu.icl') diff --git a/osmenu.icl b/osmenu.icl index 72e3daf..6e80ee7 100644 --- a/osmenu.icl +++ b/osmenu.icl @@ -120,9 +120,6 @@ osTrackPopUpMenu menu framePtr tb // Changing (sub)menus: osAppendMenuItem :: !OSMenuBar !Int !OSMenu !{#Char} !Bool !Bool !Char !*OSToolbox -> (!OSMenuItem,!OSMenu,!*OSToolbox) osAppendMenuItem {menuWindow} index menu title able mark key tb - # title = if (key <> '\0') - (title +++ "\tCtrl+" +++ toString (toUpper key)) - title # (item,tb) = winInsertMenuItem title able mark menu index tb | key <> '\0' = (item,menu,winAddMenuShortKey menuWindow item key tb) -- cgit v1.2.3