As a very first trying to debug the main variables and i never see the
terminal output of:
?" ------ *xxx " + cRootPath
is this function called, or might by hbide redirect the standard output ?
--------------------------------
FUNCTION hbide_fetchSubPaths( aPaths, cRootPath, lSubs )
LOCAL aDir, a_
DEFAULT lSubs TO .t.
?" ------ * " + cRootPath
IF right( cRootPath, 1 ) != hb_osPathSeparator()
cRootPath += hb_osPathSeparator()
ENDIF
?" ------ ** " + cRootPath
cRootPath := hbide_pathToOSPath( cRootPath )
?" ------ *** " + cRootPath
aadd( aPaths, cRootPath )
IF lSubs
aDir := directory( cRootPath + "*.", "D" )
FOR EACH a_ IN aDir
IF a_[ 5 ] == "D" .AND. left( a_[ 1 ], 1 ) != "."
hbide_fetchSubPaths( @aPaths, cRootPath + a_[ 1 ] )
ENDIF
NEXT
ENDIF
RETURN NIL
Thank you
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
