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

2011-08-19 15:01 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbide/ideenviron.prg
    * Auto Detection: if hbide.exe is accompanied by hbmk2.exe,
      and no environment is set, attempt is made to set path 
      of Harbour installation automatically. I do not know
      the logic foe *.nix systems, please fix.
This commit is contained in:
Pritpal Bedi
2011-08-19 22:05:27 +00:00
parent 29a6a02138
commit c877a0a86e
2 changed files with 13 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -16,6 +16,13 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-08-19 15:01 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/ideenviron.prg
* Auto Detection: if hbide.exe is accompanied by hbmk2.exe,
and no environment is set, attempt is made to set path
of Harbour installation automatically. I do not know
the logic foe *.nix systems, please fix.
2011-08-18 14:12 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/rddsql/sqlbase.c
! fixed transfering records between two "array" SQLBASE workareas, when there

7
harbour/contrib/hbide/ideenviron.prg
View File

@@ -201,7 +201,7 @@ METHOD IdeEnvironments:getHbmk2Commands( cEnvName )
/*------------------------------------------------------------------------*/
METHOD IdeEnvironments:prepareBatch( cEnvName )
LOCAL n, s, a_, aCmd := {}
LOCAL cPath, n, s, a_, aCmd := {}
IF ( n := ascan( ::aEnvrns, {|e_| e_[ 1 ] == cEnvName } ) ) > 0
FOR EACH a_ IN ::aEnvrns[ n, 2 ]
@@ -210,6 +210,11 @@ METHOD IdeEnvironments:prepareBatch( cEnvName )
aadd( aCmd, a_[ 2 ] )
ENDIF
NEXT
ELSE
hb_fNameSplit( hb_dirBase(), @cPath )
IF hb_fileExists( cPath + hb_ps() + "hbmk2.exe" )
aadd( aCmd, "SET PATH=" + cPath + ";%PATH%" )
ENDIF
ENDIF
RETURN hbide_getShellCommandsTempFile( aCmd )