From e83b6c0f28ceab48e17d7c31cecececb8eff216a Mon Sep 17 00:00:00 2001
From: Przemyslaw Czerpak <druzus@priv.onet.pl>
Date: Fri, 18 Dec 2009 02:58:48 +0000
Subject: [PATCH] 2009-12-18 03:58 UTC+0100 Przemyslaw Czerpak
 (druzus/at/priv.onet.pl)   * harbour/src/rtl/gtxwc/gtxwc.c     ! fixed memory
 leak caused by unreleased text property value

---
 harbour/ChangeLog             | 4 ++++
 harbour/src/rtl/gtxwc/gtxwc.c | 2 ++
 2 files changed, 6 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index fbd88346cd..8b5cf3bbcc 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-12-18 03:58 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/src/rtl/gtxwc/gtxwc.c
+    ! fixed memory leak caused by unreleased text property value
+
 2009-12-17 18:57 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
   * contrib/hbxbp/xbp3state.prg
   * contrib/hbxbp/xbpbrowse.prg
diff --git a/harbour/src/rtl/gtxwc/gtxwc.c b/harbour/src/rtl/gtxwc/gtxwc.c
index adec3a85d1..4e16efd2cd 100644
--- a/harbour/src/rtl/gtxwc/gtxwc.c
+++ b/harbour/src/rtl/gtxwc/gtxwc.c
@@ -2163,6 +2163,8 @@ static void hb_gt_xwc_WndProc( PXWND_DEF wnd, XEvent *evt )
 #endif
                   }
                }
+               if( text.value )
+                  XFree( text.value );
             }
          }
          else if( wnd->ClipboardRequest == s_atomTargets )