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

2012-06-26 11:09 UTC+0200 Viktor Szakats (harbour syenar.net)

Browse Source 
* INSTALL
    * minor update
  * utils/hbmk2/hbmk2.prg
    * make sure to convert script parameter to native pathseps
This commit is contained in:
Viktor Szakats
2012-06-26 09:10:50 +00:00
parent adfeaabf59
commit 4dbffeb075
3 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -16,6 +16,12 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-06-26 11:09 UTC+0200 Viktor Szakats (harbour syenar.net)
* INSTALL
* minor update
* utils/hbmk2/hbmk2.prg
* make sure to convert script parameter to native pathseps
2012-06-25 09:52 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbqt/qtcore/hbqt_hbqevents.cpp
! Fixed: a heavy memory leak and optimization in event handelling.

2
harbour/INSTALL
View File

@@ -238,7 +238,7 @@ HARBOUR
If you want to rebuild one specific contrib package, use this:
cd contrib/<name>
..\..\bin\<plat>\<comp>\hbmk2 ..\make.hb [clean] [install] [custom hbmk2 options]
../../bin/<plat>/<comp>/hbmk2 ../make.hb [clean] [install] [custom hbmk2 options]
3. HOW TO CREATE DISTRIBUTABLE PACKAGES

4
harbour/utils/hbmk2/hbmk2.prg
View File

@@ -589,7 +589,7 @@ PROCEDURE _APPMAIN( ... )
IF ( Right( Lower( hb_FNameName( hb_argv( 0 ) ) ), 5 ) == "hbrun" .OR. ;
Left( Lower( hb_FNameName( hb_argv( 0 ) ) ), 5 ) == "hbrun" .OR. ;
hb_PValue( 1 ) == "." .OR. ;
"|" + Lower( hb_FNameExt( hb_PValue( 1 ) ) ) + "|" $ "|.hb|.hrb|.dbf|" ) .AND. ;
"|" + Lower( hb_FNameExt( PathSepToSelf( hb_PValue( 1 ) ) ) ) + "|" $ "|.hb|.hrb|.dbf|" ) .AND. ;
!( ! Empty( hb_PValue( 1 ) ) .AND. ;
( Left( hb_PValue( 1 ), 6 ) == "-hbreg" .OR. ;
Left( hb_PValue( 1 ), 8 ) == "-hbunreg" ) )
@@ -12281,6 +12281,8 @@ STATIC PROCEDURE __hbshell( cFile, ... )
/* Do the thing */
cFile := PathSepToSelf( cFile )
IF !( cFile == "." ) .AND. ;
! Empty( hb_FNameName( cFile ) ) .AND. ;
! Empty( cFile := FindInPath( cFile,, { ".hb", ".hrb" } ) )