Frank Shearar uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-fbs.554.mcz
==================== Summary ====================
Name: Collections-fbs.554 Author: fbs Time: 29 December 2013, 7:10:52.228 pm UUID: eed3b0bf-2aaa-8d43-acc7-693d5881a32c Ancestors: Collections-fbs.553
Make browseWithPrettyPrint, browseWithDragNDrop pragma-based preferences.
=============== Diff against Collections-fbs.553 ===============
Item was changed: ----- Method: Text>>askIfAddStyle:req: (in category 'attributes') ----- askIfAddStyle: priorMethod req: requestor "Ask the user if we have a complex style (i.e. bold) for the first time" | tell answ old | + (SystemBrowser browseWithPrettyPrint) - (Preferences browseWithPrettyPrint) ifTrue: [self couldDeriveFromPrettyPrinting ifTrue: [^ self asString]]. self runs coalesce. self unembellished ifTrue: [^ self asString]. priorMethod ifNotNil: [old := priorMethod getSourceFromFile]. (old == nil or: [old unembellished]) ifTrue: [tell := 'This method contains style for the first time (e.g. bold or colored text). Do you really want to save the style info?'. answ := (UIManager default chooseFrom: #('Save method with style' 'Save method simply') title: tell). answ = 2 ifTrue: [^ self asString]]!
packages@lists.squeakfoundation.org