equal
deleted
inserted
replaced
2057 '.' asFilename filesDo:[:f | Transcript showCR:f]. |
2057 '.' asFilename filesDo:[:f | Transcript showCR:f]. |
2058 " |
2058 " |
2059 |
2059 |
2060 "Created: / 29-08-2006 / 11:03:15 / cg" |
2060 "Created: / 29-08-2006 / 11:03:15 / cg" |
2061 "Modified: / 29-05-2007 / 12:02:46 / cg" |
2061 "Modified: / 29-05-2007 / 12:02:46 / cg" |
|
2062 ! |
|
2063 |
|
2064 recursiveDirectoryContentsAsFilenamesDo:aBlock |
|
2065 "evaluate aBlock for all files and directories found under the receiver. |
|
2066 The block is invoked with the filenames as argument. |
|
2067 The walk is bread-first. |
|
2068 This excludes any entries for '.' or '..'. |
|
2069 Subdirectory files are included with a relative pathname. |
|
2070 Warning: this may take a long time to execute (especially with deep and/or remote fileSystems)." |
|
2071 |
|
2072 self recursiveDirectoryContentsDo:[:relFn | |
|
2073 aBlock value:(self construct:relFn) |
|
2074 ]. |
|
2075 |
|
2076 " |
|
2077 '.' asFilename recursiveDirectoryContentsAsFilenamesDo:[:f | Transcript showCR:f] |
|
2078 " |
|
2079 |
|
2080 "Modified: / 12-09-2010 / 15:43:22 / cg" |
2062 ! |
2081 ! |
2063 |
2082 |
2064 recursiveDirectoryContentsDo:aBlock |
2083 recursiveDirectoryContentsDo:aBlock |
2065 "evaluate aBlock for all files and directories found under the receiver. |
2084 "evaluate aBlock for all files and directories found under the receiver. |
2066 The block is invoked with the relative filenames as string-argument. |
2085 The block is invoked with the relative filenames as string-argument. |
5796 ! ! |
5815 ! ! |
5797 |
5816 |
5798 !Filename class methodsFor:'documentation'! |
5817 !Filename class methodsFor:'documentation'! |
5799 |
5818 |
5800 version |
5819 version |
5801 ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.361 2010-11-19 13:25:20 stefan Exp $' |
5820 ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.362 2010-12-23 16:19:14 cg Exp $' |
5802 ! |
5821 ! |
5803 |
5822 |
5804 version_CVS |
5823 version_CVS |
5805 ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.361 2010-11-19 13:25:20 stefan Exp $' |
5824 ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.362 2010-12-23 16:19:14 cg Exp $' |
5806 ! ! |
5825 ! ! |
5807 |
5826 |
5808 Filename initialize! |
5827 Filename initialize! |