diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index a918e1e734..4bcbd41a09 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,11 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-10-23 13:27 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/src/rtl/hbgtcore.c
+  * harbour/include/hbgtinfo.ch
+    * renamed HB_GTI_CLIPBOARDPAST -> HB_GTI_CLIPBOARDPASTE
+
 2009-10-23 13:24 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/src/rtl/hbgtcore.c
     ! fixed recent modification to work also with system clipboards
diff --git a/harbour/include/hbgtinfo.ch b/harbour/include/hbgtinfo.ch
index cc55b3b392..4cbc4920c6 100644
--- a/harbour/include/hbgtinfo.ch
+++ b/harbour/include/hbgtinfo.ch
@@ -80,7 +80,7 @@
 #define HB_GTI_FULLSCREEN       13  /* Is it full screen GT driver? */
 #define HB_GTI_KBDSUPPORT       14  /* Is it keyboard input supported? */
 #define HB_GTI_CLIPBOARDDATA    15  /* Get/Set clipboard */
-#define HB_GTI_CLIPBOARDPAST    16  /* Paste clipboard data into keyboard buffer */
+#define HB_GTI_CLIPBOARDPASTE   16  /* Paste clipboard data into keyboard buffer */
 #define HB_GTI_CURSORBLINKRATE  19  /* Get/Set cursor blinking rate in milliseconds */
 #define HB_GTI_DESKTOPROWS      20  /* Get Size of desktop in character rows */
 #define HB_GTI_DESKTOPCOLS      21  /* Get Size of desktop in character cols */
diff --git a/harbour/src/rtl/hbgtcore.c b/harbour/src/rtl/hbgtcore.c
index 7a485f7423..6591f218c6 100644
--- a/harbour/src/rtl/hbgtcore.c
+++ b/harbour/src/rtl/hbgtcore.c
@@ -1571,7 +1571,7 @@ static BOOL hb_gt_def_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo )
          }
          break;
 
-      case HB_GTI_CLIPBOARDPAST:
+      case HB_GTI_CLIPBOARDPASTE:
          if( HB_GTSELF_INFO( pGT, HB_GTI_CLIPBOARDDATA, pInfo ) )
             HB_GTSELF_INKEYSETTEXT( pGT, hb_itemGetCPtr( pInfo->pResult ),
                                          hb_itemGetCLen( pInfo->pResult ) );