From cae8d169636e5135a78d7c287b212ecb4d77fa09 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Mon, 31 Jan 2011 12:40:04 +0000 Subject: [PATCH] 2011-01-31 13:38 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * contrib/hbide/idemisc.prg ! Applied FN_FromArray() fix to the copy in HBIDE. ; QUESTION: Should we make some of these file manipulation functions part of core (possibly with reorganized names)? These are generally useful, and some of them are not trivial, some others are often used, and all of them generic: Some possible candidates from hbmk2: hb_pwd() PathNormalize( ... ) PathMakeAbsolute( ... ) PathMakeRelative( ... ) PathSepToSelf( ... ) DirAddPathSep( ... ) DirDelPathSep( ... ) DirBuild( ... ) DirUnbuild( ... ) FNameDirGet( ... ) FNameDirExtSet( ... ) FNameNameGet( ... ) FNameNameExtGet( ... ) FNameExtGet( ... ) FNameExtDef( ... ) FNameExtSet( ... ) FNameEscape( ... ) --- harbour/ChangeLog | 27 +++++++++++++++++++++++++++ harbour/contrib/hbide/idemisc.prg | 5 ++++- 2 files changed, 31 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 5ce380c445..e9cfa1860e 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,33 @@ The license applies to all entries newer than 2009-04-28. */ +2011-01-31 13:38 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * contrib/hbide/idemisc.prg + ! Applied FN_FromArray() fix to the copy in HBIDE. + ; QUESTION: Should we make some of these file manipulation + functions part of core (possibly with + reorganized names)? These are generally useful, + and some of them are not trivial, some others + are often used, and all of them generic: + Some possible candidates from hbmk2: + hb_pwd() + PathNormalize( ... ) + PathMakeAbsolute( ... ) + PathMakeRelative( ... ) + PathSepToSelf( ... ) + DirAddPathSep( ... ) + DirDelPathSep( ... ) + DirBuild( ... ) + DirUnbuild( ... ) + FNameDirGet( ... ) + FNameDirExtSet( ... ) + FNameNameGet( ... ) + FNameNameExtGet( ... ) + FNameExtGet( ... ) + FNameExtDef( ... ) + FNameExtSet( ... ) + FNameEscape( ... ) + 2011-01-31 13:00 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/utils/hbmk2/hbmk2.prg ! small fix in FN_FromArray() which caused that relative paths were diff --git a/harbour/contrib/hbide/idemisc.prg b/harbour/contrib/hbide/idemisc.prg index 3202de9d24..d075349a4c 100644 --- a/harbour/contrib/hbide/idemisc.prg +++ b/harbour/contrib/hbide/idemisc.prg @@ -1613,7 +1613,10 @@ STATIC FUNCTION FN_FromArray( aPath, nFrom, nTo, cFileName, cDirPrefix ) cDir := "" FOR tmp := nFrom TO nTo - cDir += aPath[ tmp ] + hb_ps() + cDir += aPath[ tmp ] + IF nFrom < nTo + cDir += hb_ps() + ENDIF NEXT RETURN hb_FNameMerge( DirDelPathSep( hbide_DirAddPathSep( cDirPrefix ) + cDir ), cFileName )