*** empty log message ***

1999-10-19 08:36:00 +00:00
parent e611a86857
commit 57fc886372
1 changed files with 5 additions and 2 deletions
--- a/harbour/source/rtl/gt/gtwin.c
+++ b/harbour/source/rtl/gt/gtwin.c
@@ -112,8 +112,11 @@ void hb_gt_Init( void )

   if( ( hb_gtHInput = GetStdHandle( STD_INPUT_HANDLE ) ) == INVALID_HANDLE_VALUE )
   {
-      AllocConsole(); /* It is a Windows app without a console, so we create one */
-      hb_gtHInput = GetStdHandle( STD_INPUT_HANDLE );
+      if( hb_dynsymFindName( "__DBGENTRY" ) ) /* the debugger is linked */
+      {
+         AllocConsole(); /* It is a Windows app without a console, so we create one */
+         hb_gtHInput = GetStdHandle( STD_INPUT_HANDLE );
+      }
   }

   SetConsoleMode( hb_gtHInput, 0 );