diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 3cb6c946dd..cbc59a4427 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,13 @@ The license applies to all entries newer than 2009-04-28. */ +2011-11-03 15:24 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/hbide/ideedit.prg + + Implemented: F3 key as "Search Next" per default key for + next search of previous string on some platforms. + NOTE: if you have mapped F3 for some other action than + "Search Next" action will be ceased. + 2011-10-30 01:35 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/src/rtl/hbdyn.c * added dummy assignment to pacify warning diff --git a/harbour/contrib/hbide/ideedit.prg b/harbour/contrib/hbide/ideedit.prg index cf75589401..145118c010 100644 --- a/harbour/contrib/hbide/ideedit.prg +++ b/harbour/contrib/hbide/ideedit.prg @@ -634,6 +634,13 @@ METHOD IdeEdit:execKeyEvent( nMode, nEvent, p, p1 ) SWITCH ( key ) + + CASE Qt_Key_F3 + IF ! lCtrl .AND. ! lAlt + ::oFR:find( .f. ) + ENDIF + EXIT + CASE Qt_Key_Insert IF lCtrl ::copy()