From 1913612f5b960acf46e2a0b3836b8286e675467d Mon Sep 17 00:00:00 2001
From: Pritpal Bedi <bedipritpal@hotmail.com>
Date: Tue, 30 Dec 2014 01:24:12 -0800
Subject: [PATCH] 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.

---
 ChangeLog.txt        | 4 ++++
 src/rtl/memoedit.prg | 4 ++--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ChangeLog.txt b/ChangeLog.txt
index b9fd0465bb..b8122767c3 100644
--- a/ChangeLog.txt
+++ b/ChangeLog.txt
@@ -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
diff --git a/src/rtl/memoedit.prg b/src/rtl/memoedit.prg
index 5af83ae82a..be78acf50c 100644
--- a/src/rtl/memoedit.prg
+++ b/src/rtl/memoedit.prg
@@ -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