Thanks Pritpal. There is a typo (of mine): __PLATFORM_UNIX is missing an underscore: __PLATFORM__UNIX.
Viktor On 2010 Apr 21, at 22:02, vouch...@users.sourceforge.net wrote: > Revision: 14352 > > http://harbour-project.svn.sourceforge.net/harbour-project/?rev=14352&view=rev > Author: vouchcac > Date: 2010-04-21 20:02:51 +0000 (Wed, 21 Apr 2010) > > Log Message: > ----------- > 2010-04-21 12:56 UTC-0800 Pritpal Bedi (prit...@vouchcac.com) > * contrib/hbide/idesaveload.prg > + Implemented: hbIDE data files to be saved/retrieved in > system folders if hbide.ini with path is not supplied > on the command-line. The following algorythm is used: > > FUNCTION hbide_getIniPath( cHbideIni ) > LOCAL cPath, cIni > > IF empty( cHbideIni ) > IF ! hb_FileExists( cIni := hb_dirBase() + "hbide.ini" ) > #if defined( __PLATFORM__WINDOWS ) > cPath := hbide_DirAddPathSep( GetEnv( "APPDATA" ) ) + "hbide\" > #elif defined( __PLATFORM_UNIX ) > cPath := hbide_DirAddPathSep( GetEnv( "HOME" ) ) + ".hbide/" > #endif > IF ! hb_dirExists( cPath ) > MakeDir( cPath ) > ENDIF > cIni := cPath + "hbide.ini" > ENDIF > ELSE > cIni := cHbideIni > ENDIF > > RETURN cIni > > This change makes hbIDE to be able to run on any system > installed via an installer where a writable folder is expected > to write to application data. > > Thanks Viktor for the actual code and guidance. > > Modified Paths: > -------------- > trunk/harbour/ChangeLog > trunk/harbour/contrib/hbide/idesaveload.prg > > > This was sent by the SourceForge.net collaborative development platform, the > world's largest Open Source development site. > _______________________________________________ > Harbour mailing list (attachment size limit: 40KB) > Harbour@harbour-project.org > http://lists.harbour-project.org/mailman/listinfo/harbour _______________________________________________ Harbour mailing list (attachment size limit: 40KB) Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour