From 8183a575f65bc0332a3ec27f2955b76c64a92dfb Mon Sep 17 00:00:00 2001
From: Luiz Rafael Culik <culik@sl.conex.net>
Date: Thu, 15 Aug 2002 20:56:11 +0000
Subject: [PATCH] See changelog 20002-08-15 17:40 UTC-0300

---
 harbour/ChangeLog               | 4 ++++
 harbour/source/rtl/memoedit.prg | 3 +++
 2 files changed, 7 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 157fcde451..c09f2fe8b8 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,10 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2002-08-15 17:40 UTC-0300 Luiz Rafael Culik <culikr@uol.com.br>
+  * source/rtl/memoedit.prg
+    * When User function is Defined , Make ALT+W key exit the Editing windows if not redefined inside the UDF function
+
 2002-08-14 14:55 UTC-0300 Horacio Roldan <harbour_ar@yahoo.com.ar>
    * source/rdd/dbfcdx/dbfcdx1.c
      ! fixed some warnings
diff --git a/harbour/source/rtl/memoedit.prg b/harbour/source/rtl/memoedit.prg
index 4850aeb71e..9f4fbc1dd3 100644
--- a/harbour/source/rtl/memoedit.prg
+++ b/harbour/source/rtl/memoedit.prg
@@ -186,6 +186,9 @@ METHOD HandleUserKey(nKey, nUserKey) CLASS TMemoEditor
          if nKey <= 256 .AND. AScan(aUnHandledKeys, nKey) == 0
             super:Edit(nKey)
          endif
+      if nKey == K_ALT_W
+           super:Edit(nKey)
+      endif
 
       // TOFIX: Not clipper compatible, see teditor.prg
       case (nUserKey >= 1 .AND. nUserKey <= 31) .OR. nUserKey == K_ALT_W