2009-03-12 13:32 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

* harbour/source/rtl/gttrm/gttrm.c
    + added some missing xterm key sequences

  * harbour/utils/hbmk2/hbmk2.prg
    ! fixed curses name in SunOS builds (here we are using native curses
      library not ncurses)

  * harbour/config/hpux/global.cf
  * harbour/config/sunos/global.cf
    * enabled GTXWC disabled for default builds

harbour/ChangeLog

@@ -8,6 +8,18 @@
    2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-03-12 13:32 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/rtl/gttrm/gttrm.c
+    + added some missing xterm key sequences
+
+  * harbour/utils/hbmk2/hbmk2.prg
+    ! fixed curses name in SunOS builds (here we are using native curses
+      library not ncurses)
+
+  * harbour/config/hpux/global.cf
+  * harbour/config/sunos/global.cf
+    * enabled GTXWC disabled for default builds
+
 2009-03-12 10:55 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
   * contrib/hbtpathy/telepath.prg
     ! Fixed to use __PLATFORM__UNIX instead of __PLATFORM__LINUX.

harbour/config/hpux/global.cf

@@ -21,7 +21,7 @@ ifneq ($(HB_WITHOUT_GTSLN),yes)
 endif
 endif
 ifneq ($(HB_WITHOUT_X11),yes)
-#   HB_GT_LIST += gtxwc
+   HB_GT_LIST += gtxwc
 endif
 
 # verify if GT drivers exist

harbour/config/sunos/global.cf

@@ -21,7 +21,7 @@ ifneq ($(HB_WITHOUT_GTSLN),yes)
 endif
 endif
 ifneq ($(HB_WITHOUT_X11),yes)
-#   HB_GT_LIST += gtxwc
+   HB_GT_LIST += gtxwc
 endif
 
 # verify if GT drivers exist

harbour/source/rtl/gttrm/gttrm.c

@@ -2457,6 +2457,16 @@ static void init_keys( PHB_GTTRM pTerm )
       { EXKEY_F3 |KEY_CTRLMASK|KEY_ALTMASK, "\033O2R" },
       { EXKEY_F4 |KEY_CTRLMASK|KEY_ALTMASK, "\033O2S" },
 
+      { EXKEY_F1 |KEY_CTRLMASK|KEY_ALTMASK, "\033O1;2P" },
+      { EXKEY_F2 |KEY_CTRLMASK|KEY_ALTMASK, "\033O1;2Q" },
+      { EXKEY_F3 |KEY_CTRLMASK|KEY_ALTMASK, "\033O1;2R" },
+      { EXKEY_F4 |KEY_CTRLMASK|KEY_ALTMASK, "\033O1;2S" },
+
+      { EXKEY_F1 |KEY_CTRLMASK|KEY_ALTMASK, "\033[1;2P" },
+      { EXKEY_F2 |KEY_CTRLMASK|KEY_ALTMASK, "\033[1;2Q" },
+      { EXKEY_F3 |KEY_CTRLMASK|KEY_ALTMASK, "\033[1;2R" },
+      { EXKEY_F4 |KEY_CTRLMASK|KEY_ALTMASK, "\033[1;2S" },
+
       { EXKEY_F1 |KEY_CTRLMASK|KEY_ALTMASK, "\033[11;2~" },
       { EXKEY_F2 |KEY_CTRLMASK|KEY_ALTMASK, "\033[12;2~" },
       { EXKEY_F3 |KEY_CTRLMASK|KEY_ALTMASK, "\033[13;2~" },

harbour/utils/hbmk2/hbmk2.prg

@@ -1224,7 +1224,7 @@ FUNCTION Main( ... )
 
          IF IsGTRequested( s_cGT, s_aLIBUSERGT, s_aLIBDYNHAS, s_lSHARED, "gtcrs" )
             /* TOFIX: Sometimes 'ncur194' is needed. */
-            AAdd( s_aLIBSYS, "ncurses" )
+            AAdd( s_aLIBSYS, IIF( t_cARCH == "sunos", "curses", "ncurses" ) )
          ENDIF
          IF IsGTRequested( s_cGT, s_aLIBUSERGT, s_aLIBDYNHAS, s_lSHARED, "gtsln" )
             AAdd( s_aLIBSYS, "slang" )