author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Wed, 20 Nov 2013 15:12:13 +0000 | |
branch | jv |
changeset 18106 | 48ba10eeb21c |
parent 18105 | 3a3a3e0ac47f |
child 18107 | d46c13a0795b |
Smalltalk.st | file | annotate | diff | comparison | revisions |
--- a/Smalltalk.st Mon Nov 04 11:11:22 2013 -0300 +++ b/Smalltalk.st Wed Nov 20 15:12:13 2013 +0000 @@ -5202,6 +5202,10 @@ |dir noAutoloadHere dirName directoryContents haveAbbrevDotSTC| dir := aDirectory asFilename. + + "/ Care for non-existent directories" + dir exists ifFalse:[ ^ self ]. + dirName := dir physicalPathName. "take care of symbolic links" (dirsConsulted includes:dirName) ifTrue:[