On Apr 5, 2012, at 11:07 AM, Hilaire Fernandes wrote: > But still I have to hand delete SystemProgressMorph after each use: > > World submorphs > select: [:m | m class == (Smalltalk at: #SystemProgressMorph)] > thenDo: [:morph | morph delete]. > > Strange.
Yes this is strange. > > It only occure after my installation of DrGeo and clean up. > I will track the problem > > Here is my image building script, may be I am installed too old package: > > Gofer new > url: 'http://www.squeaksource.com/MetacelloRepository'; > package: 'ConfigurationOfOCompletion'; > load. > ((Smalltalk at: #ConfigurationOfOCompletion) project version: '1.4') load. > > > Gofer new > url: 'http://www.squeaksource.com/MetacelloRepository'; > package: 'ConfigurationOfShout'; > load. > ((Smalltalk at: #ConfigurationOfShout) project version: '1.3') load. > > Gofer new > url: 'http://www.squeaksource.com/DrGeoII'; > package: 'ConfigurationOfDrGeo'; > load. > (Smalltalk at: #ConfigurationOfDrGeo ) perform:#load. > > Gofer new > url: 'http://www.squeaksource.com/PharoNonCorePackages'; > package: 'ConfigurationOfGettext'; > load. > (Smalltalk at: #ConfigurationOfGettext) perform:#load. > > > UIThemeWatery2 resetDefaultSettings. > PolymorphSystemSettings uiThemeClass: UIThemeWatery2. > > TextDomainManager registerCategoryPrefix: 'DrGeoII' domain: 'DrGeoII'. > TextDomainManager registerCategoryPrefix: 'pharo' domain: 'pharo'. > Locale activated: true. > > WorldState desktopMenuTitle: 'Dr. Geo'. > WorldState desktopMenuPragmaKeyword: 'drgeoMenu'. > > "Clean for production then install font, and clean again to remove the > unused fonts" > > "DrGDistroInfo cleanUpForRelease." > ScriptLoader new cleanUpForProduction. > > Gofer new > url: 'http://www.squeaksource.com/DejaVu'; > package: 'DejaVuBitmapFonts'; > load. > > (Smalltalk at: #DejaVuHolder) perform: #installSizes: with: #(9 11). > StandardFonts setDefaultFonts: #( > (codeFont: 'Bitmap DejaVu Sans Regular' 11) > (listFont: 'Bitmap DejaVu Sans Regular' 11) > (menuFont: 'Bitmap DejaVu Sans Regular' 11) > (windowTitleFont: 'Bitmap DejaVu Sans Regular' 11) > (balloonFont: 'Bitmap DejaVu Sans Regular' 9) > (haloFont: 'Bitmap DejaVu Sans Regular' 9) > (buttonFont: 'Bitmap DejaVu Sans Regular' 11) > (defaultFont: 'Bitmap DejaVu Sans Regular' 11)). > SystemOrganization removeSystemCategory: #DejaVuBitmapFonts. > StrikeFont cleanUp. > > SmalltalkImage checkSourcesFileAvailability: false. > SmalltalkImage checkChangesFileAvailability: false. > > DrGDefault beWorkstation. > Smalltalk saveAs: 'drgeo'. > World submorphs > select: [:m | m class == (Smalltalk at: #DrGeoWindow)] > thenDo: [:drMorph | drMorph deleteWithoutConfirmation ]. > > > Smalltalk condenseChanges. > Author fullName: 'DrGeoUser'. > Smalltalk snapshot: true andQuit: true. > > "Done" > > > > > > Hilaire > > > Le 05/04/2012 10:51, Hilaire Fernandes a écrit : >> Le 04/04/2012 17:30, Marcus Denker a écrit : >>> This is strange... >>> >>> ScriptLoader new cleanUpForProduction >>> >>> generates a 8.4 MB Image... >>> >> >> >> Great. >> >> Hilaire >> > > > -- > Dr. Geo -- http://www.drgeo.eu > >
