Anonymous user
Walk a directory/Recursively: Difference between revisions
m
→{{header|Smalltalk}}: sorted instead of ordered
(→{{header|Tcl}}: ++ smalltalk) |
m (→{{header|Smalltalk}}: sorted instead of ordered) |
||
Line 463:
wholeContent: aPattern withLevel: l do: twoBlock [
|cont|
cont := (self contents)
cont remove: '.'; remove: '..'.
cont
| |||