fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2014-12-30 01:19 UTC-0800 Pritpal Bedi (bedipritpal/at/hotmail.com)

Browse Source 
* src/rtl/memoedit.prg
    ! Fixed: nUdfReturn value ME_UNKEY (1-31) were not being processed.
This commit is contained in:
Pritpal Bedi
2014-12-30 01:24:12 -08:00
parent bcbd37990b
commit 1913612f5b
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog.txt
View File

@@ -10,6 +10,10 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2014-12-30 01:19 UTC-0800 Pritpal Bedi (bedipritpal/at/hotmail.com)
* src/rtl/memoedit.prg
! Fixed: nUdfReturn value ME_UNKEY (1-31) were not being processed.
2014-12-29 20:27 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* include/hbznet.h
* src/rtl/hbinet.c

4
src/rtl/memoedit.prg
View File

@@ -258,8 +258,8 @@ METHOD HandleUserKey( nKey, nUdfReturn ) CLASS HBMemoEditor
OTHERWISE
// TOFIX: Not CA-Cl*pper compatible, see teditor.prg
IF HB_ISNUMERIC( nKey ) .AND. ( ( nKey >= 1 .AND. nKey <= 31 ) .OR. nKey == K_ALT_W )
::super:Edit( nKey )
IF ( nUdfReturn >= 1 .AND. nUdfReturn <= 31 ) .OR. nUdfReturn == K_ALT_W
::super:Edit( nUdfReturn )
ELSE
RETURN .F.
ENDIF