Karl Ramberg uploaded a new version of Tools to project Etoys: http://source.squeak.org/etoys/Tools-kfr.12.mcz
==================== Summary ====================
Name: Tools-kfr.12 Author: kfr Time: 24 October 2012, 11:26:23 pm UUID: 843de3f1-e247-504f-ae3b-9d0eb71e3c4f Ancestors: Tools-kfr.11
Add preferences to file services
=============== Diff against Tools-kfr.11 ===============
Item was changed: ----- Method: FileList class>>initialize (in category 'class initialization') ----- initialize "FileList initialize"
RecentDirs := OrderedCollection new. (self systemNavigation allClassesImplementing: #fileReaderServicesForFile:suffix:) do: [:providerMetaclass | self registerFileReader: providerMetaclass soleInstance].
+ #(AnimatedImageMorph AnonymousSoundMorph ChangeList DummyToolWorkingWithFileList EventRecorderMorph FileContentsBrowser FileStream FlashMorphReader Form GZipWriteStream InternalTranslator MoviePlayerMorph MPEGMoviePlayerMorph OggSpeexCodec OggVorbisCodec Preferences ProjectViewMorph SARInstaller ScorePlayerMorph SugarLauncher TTFontReader) do: [:cls | - #(AnimatedImageMorph AnonymousSoundMorph ChangeList DummyToolWorkingWithFileList EventRecorderMorph FileContentsBrowser FileStream FlashMorphReader Form GZipWriteStream InternalTranslator MoviePlayerMorph MPEGMoviePlayerMorph OggSpeexCodec OggVorbisCodec ProjectViewMorph SARInstaller ScorePlayerMorph SugarLauncher TTFontReader) do: [:cls | Smalltalk at: cls asSymbol ifPresent: [:c | self registerFileReader: c]].!
etoys-dev@lists.squeakfoundation.org