Re: Command key F7 in menu?

If you "cd" to aubit4glsrc/lib/libui/ui_curses

Look in lib/libui/ui_curses/curslib.c - around line 1009 :


          a = A4GL_menu_getkey (menu);
             *   if (a==3006) abort_pressed++;*
          if (abort_pressed) {
                int_flag=1;
                a=A4GLKEY_INTERRUPT;
                }
          if (a )
            break;
        }

Comment out that abort_pressed line :


          a = A4GL_menu_getkey (menu);
   *             //if (a==3006) abort_pressed++;*
          if (abort_pressed) {
                int_flag=1;
                a=A4GLKEY_INTERRUPT;
                }
          if (a )
            break;
        }


Recompile (just "make" in that directory should do it) - and you should be
good to go.. (its already committed to SVN)

That bug has been in there since 2008, so well done finding it!!



On Wed, 19 Aug 2020 at 16:14, Gjerstad, Øyvind <[email protected]>
wrote:

> Compiled from source
>
> Get Outlook for Android<https://aka.ms/ghei36>
>
> ________________________________
> From: Mike Aubury <[email protected]>
> Sent: Wednesday, August 19, 2020 4:48:45 PM
> To: Gjerstad, Øyvind <[email protected]>
> Cc: [email protected] <
> [email protected]>
> Subject: Re: [Aubit4gl-discuss] Command key F7 in menu?
>
> Did you compile from source, or download a binary ?
>
> I can see the issue (no idea why its there), just wondering on the best
> way to get you the fix.
>
> On Wed, 19 Aug 2020 at 15:24, Gjerstad, Øyvind <
> [email protected]<mailto:[email protected]>> wrote:
> Given this simple program, I can't get F7 to work, but most (all?) of the
> other keys works as expected. I have checked that the terminal definition
> is correct.
> (In a form input, using "on key" it works....)
> What am I doing wrong?
>
> Using Aubit 4gl 1.2_39, Linux.
>
> main
>
>       menu "Hit any key "
>          command key (F1)
>             display "F1"
>             sleep 1
>
>          command key (F2)
>             display "F2"
>             sleep 1
>
>          command key (F3)
>             display "F3"
>             sleep 1
>
>          command key (F4)
>             display "F4"
>             sleep 1
>
>          command key (F5)
>             display "F5"
>             sleep 1
>
>          command key (F6)
>             display "F6"
>             sleep 1
>
>          command key (F7)
>             display "F7"
>             sleep 1
>
>          command key (F8)
>             display "F8"
>             sleep 1
>
>          command key (F9)
>             display "F9"
>             sleep 1
>
>          command key (F10)
>             display "F10"
>             sleep 1
>
>          command key (F11)
>             display "F11"
>             sleep 1
>
>          command key (F12)
>             display "F12"
>             sleep 1
>
>          command key (ACCEPT)
>             display "ACCEPT"
>             sleep 1
>
>          command key (ESC)
>             display "ESC"
>             sleep 1
>
>          command key (A)
>             display "A"
>             sleep 1
>
>          command key (Q)
>             display "Q"
>             sleep 1
>
>          command key ("!")
>             display "BANG!"
>             sleep 1
>
>          command key (UP)
>             display "UP"
>             sleep 1
>
>          command key (DOWN)
>             display "DOWN"
>             sleep 1
>
>          command key (LEFT)
>             display "LEFT"
>             sleep 1
>
>          command key (RIGHT)
>             display "RIGHT"
>             sleep 1
>
>          command key (TAB)
>             display "TAB"
>             sleep 1
>
>          command key (ENTER)
>             display "ENTER"
>             sleep 1
>
>          command key (CONTROL-P)
>             display "Control-P"
>             sleep 1
>       end menu
>
> end main
>
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]<mailto:
> [email protected]>
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>
>
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss