"Keith" == Keith Hodges keith_hodges@yahoo.co.uk writes:
Keith> SmalltalkImage-classSide-#cleanUpAll
Keith> (Smalltalk select: [ :class | class respondsTo: #cleanUp ]) do: [
Keith> :each | each cleanUp ].
#select:thenDo: would be a bit nicer there. :)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
merlyn@stonehenge.com URL:http://www.stonehenge.com/merlyn/
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!