Andreas Raab uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-ar.263.mcz
==================== Summary ====================
Name: Tools-ar.263 Author: ar Time: 1 September 2010, 10:55:03.147 pm UUID: 0de80ed6-03ef-3b40-a638-67913c9bf718 Ancestors: Tools-eem.262
Reclassify methods to fix various package dependencies.
=============== Diff against Tools-eem.262 ===============
Item was added: + ----- Method: TranscriptStream class>>windowColorSpecification (in category '*Tools') ----- + windowColorSpecification + "Answer a WindowColorSpec object that declares my preference" + + ^ WindowColorSpec classSymbol: self name wording: 'Transcript' brightColor: #lightOrange pastelColor: #paleOrange helpMessage: 'The system transcript'!
Item was added: + ----- Method: TranscriptStream class>>openMorphicTranscript (in category '*Tools') ----- + openMorphicTranscript + "Have the current project's transcript open up as a morph" + + ^ToolBuilder open: self!
Item was added: + ----- Method: TranscriptStream>>buildWith: (in category '*Tools') ----- + buildWith: builder + | windowSpec textSpec | + windowSpec := builder pluggableWindowSpec new. + windowSpec model: self. + windowSpec label: 'Transcript'. + windowSpec children: OrderedCollection new. + + textSpec := builder pluggableTextSpec new. + textSpec + model: self; + menu: #codePaneMenu:shifted:; + frame: (0@0corner: 1@1). + windowSpec children add: textSpec. + + ^builder build: windowSpec!
Item was added: + ----- Method: TranscriptStream class>>buildWith: (in category '*Tools') ----- + buildWith: aBuilder + ^(Smalltalk at: #Transcript) buildWith: aBuilder!
Item was added: + ----- Method: TranscriptStream>>openLabel: (in category '*Tools') ----- + openLabel: aString + "Open a window on this transcriptStream" + ^ToolBuilder open: self label: aString!
Item was added: + ----- Method: TranscriptStream>>open (in category '*Tools') ----- + open + | openCount | + openCount := self countOpenTranscripts. + openCount = 0 + ifTrue: [self openLabel: 'Transcript'] + ifFalse: [self openLabel: 'Transcript #' , (openCount+1) printString]!
Item was added: + ----- Method: TranscriptStream>>codePaneMenu:shifted: (in category '*Tools') ----- + codePaneMenu: aMenu shifted: shifted + "Note that unless we override perform:orSendTo:, PluggableTextController will respond to all menu items" + ^ StringHolder basicNew codePaneMenu: aMenu shifted: shifted + !
squeak-dev@lists.squeakfoundation.org