diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index cd95b27b15..5bed754d99 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2001-08-13 23:18 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
+  * source/vm/mainwin.c
+    * added hInstance assignment to hb_hInstance
+
 2001-08-11 22:45 GMT -3 Luiz Rafael Culik <culik@sl.conex.net>
   * include/hbextern.ch
     * removed extern declaration for ALTD() function
diff --git a/harbour/source/vm/mainwin.c b/harbour/source/vm/mainwin.c
index 3781d86224..e99f43165e 100644
--- a/harbour/source/vm/mainwin.c
+++ b/harbour/source/vm/mainwin.c
@@ -78,6 +78,7 @@ int WINAPI WinMain( HINSTANCE hInstance,      /* handle to current instance */
    HB_SYMBOL_UNUSED( hPrevInstance );
    HB_SYMBOL_UNUSED( iCmdShow );
 
+   hb_hInstance = hInstance;
    GetModuleFileName( hInstance, szAppName, 249 );
    argv[ 0 ] = szAppName;