From 232a5967d79e2c2c536e4cffda55e218a6b44561 Mon Sep 17 00:00:00 2001
From: April White <april@users.sourceforge.net>
Date: Sun, 27 Aug 2000 19:26:34 +0000
Subject: [PATCH] Changelog: 2000-08-27 20:10 UTC+0500 April White
 <awhite@user.rose.com>    * source/rtl/setkey.c      * bug in setkey() - was
 not adding hotkey to internal list

---
 harbour/ChangeLog           |  4 ++++
 harbour/source/rtl/setkey.c | 16 ++++++++--------
 2 files changed, 12 insertions(+), 8 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 0c2ddf8f21..8f39f0da47 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2000-08-27 20:10 UTC+0500 April White <awhite@user.rose.com>
+   * source/rtl/setkey.c
+     * bug in setkey() - was not adding hotkey to internal list
+
 2000-08-22 21:10 UTC+0800 Ron Pinkas <ron@profit-master.com>
    * source/compiler/simplex.c
      * Corrected Reset at <EOF>
diff --git a/harbour/source/rtl/setkey.c b/harbour/source/rtl/setkey.c
index e19d770222..44baaa5218 100644
--- a/harbour/source/rtl/setkey.c
+++ b/harbour/source/rtl/setkey.c
@@ -191,18 +191,18 @@ HB_FUNC( SETKEY )
                hb_itemReturn( sk_list_tmp->pAction );
          }
       }
-   }
-   else
-   {
-      /* Set a SETKEY value */
+      else
+      {
+         /* Set a SETKEY value */
 
-      sk_add( TRUE, hb_itemGetNI( pKeyCode ),
-         hb_param( 2, HB_IT_BLOCK ),
+         sk_add( TRUE, hb_itemGetNI( pKeyCode ),
+            hb_param( 2, HB_IT_BLOCK ),
 #if defined( HB_EXTENSION )
-         hb_param( 3, HB_IT_BLOCK ) );
+            hb_param( 3, HB_IT_BLOCK ) );
 #else
-         NULL );
+            NULL );
 #endif
+      }
    }
 }