diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 83f90b0637..a5e4424620 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2001-04-01 15:45 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
+   * source/rtl/gtsln/gtsln.c
+     ! minor fix, provided by Marek Paliwoda
+
 2001-04-01 12:20 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
    * source/rdd/dbfntx/dbfntx1.c
      * ntxOrderListRebuild() mostly completed
diff --git a/harbour/source/rtl/gtsln/gtsln.c b/harbour/source/rtl/gtsln/gtsln.c
index 6c2d111ee8..17c03a2034 100644
--- a/harbour/source/rtl/gtsln/gtsln.c
+++ b/harbour/source/rtl/gtsln/gtsln.c
@@ -1027,6 +1027,7 @@ static void hb_gt_build_conv_tabs()
             case SLSMG_PLMINUS_CHAR :  s_convHighChars[  ] = SLch; break;
             case SLSMG_BULLET_CHAR  :  s_convHighChars[  ] = SLch; break;
 */
+#if SLANG_VERSION > 10400
             case SLSMG_DIAMOND_CHAR :  s_convHighChars[ 04 ] = SLch; 
                                        break;
             case SLSMG_LARROW_CHAR  :  s_convHighChars[ 17 ] = SLch;
@@ -1041,6 +1042,7 @@ static void hb_gt_build_conv_tabs()
             case SLSMG_UARROW_CHAR  :  s_convHighChars[ 24 ] = SLch;
                                        s_convHighChars[ 30 ] = SLch; 
                                        break;
+#endif
             case SLSMG_BOARD_CHAR   :  s_convHighChars[ 178 ] = SLch; 
                                        break;
             case SLSMG_BLOCK_CHAR   :  s_convHighChars[ 219 ] = SLch;