'From Squeak2.9alpha of 17 July 2000 [latest update: #3398] on 3 February 2001 at 1:10:39 pm'! "Change Set: unBorder Date: 3 February 2001 Author: Bob Arning two changes wrt borders on worlds: - make the default for new worlds be no border - change existing worlds in image to zero. The user will still be able to change any existing or new world to suit." PasteUpMorph allInstancesDo: [ :x | x isWorldMorph ifTrue: [x borderWidth: 0]].! !PasteUpMorph methodsFor: 'world state' stamp: 'RAA 2/3/2001 13:09'! initForProject: aWorldState worldState _ aWorldState. bounds _ Display boundingBox. color _ (Color r:0.937 g: 0.937 b: 0.937). self addHand: HandMorph new. self setProperty: #automaticPhraseExpansion toValue: true. self setProperty: #optimumExtentFromAuthor toValue: Display extent. self borderWidth: 0. model _ nil. ! !