fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Changelog: 2000-08-27 20:10 UTC+0500 April White <awhite@user.rose.com>

Browse Source 
* source/rtl/setkey.c
     * bug in setkey() - was not adding hotkey to internal list
This commit is contained in:
April White
2000-08-27 19:26:34 +00:00
parent bbef5fccb3
commit 232a5967d7
2 changed files with 12 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -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>

16
harbour/source/rtl/setkey.c
View File

@@ -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
}
}
}