Eliot Miranda uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-eem.592.mcz==================== Summary ====================
Name: Monticello-eem.592
Author: eem
Time: 9 May 2014, 8:02:58.692 pm
UUID: cd1e8b42-aabc-4cd6-9444-a27763d253cd
Ancestors: Monticello-cmm.591
Default category in MCMethodDefinition when category name
is nil.
Provide some Spur compatibility allowing Spur packages to
be browsed.
=============== Diff against Monticello-cmm.591 ===============
Item was changed:
----- Method: MCClassDefinition>>kindOfSubclass (in category 'printing') -----
kindOfSubclass
+ type = #normal ifTrue: [^' subclass: '].
+ type = #variable ifTrue: [^' variableSubclass: '].
+ type = #bytes ifTrue: [^' variableByteSubclass: '].
+ type = #compiledMethod ifTrue: [^' variableByteSubclass: ' ].
+ type = #words ifTrue: [^' variableWordSubclass: '].
+ type = #weak ifTrue: [^' weakSubclass: ' ].
+ type = #ephemeron ifTrue: [^' ephemeronSubclass: ' ].
+ type = #immediate ifTrue: [^' immediateSubclass: ' ].
+ self error: 'Unrecognized class type'
+ !
- type = #normal ifTrue: [^ ' subclass: '].
- type = #words ifTrue: [^ ' variableWordSubclass: '].
- type = #variable ifTrue: [^ ' variableSubclass: '].
- type = #bytes ifTrue: [^ ' variableByteSubclass: '].
- type = #weak ifTrue: [^ ' weakSubclass: ' ].
- type = #compiledMethod ifTrue: [^ ' variableByteSubclass: ' ].
- self error: 'Unrecognized class type'!
Item was changed:
----- Method: MCMethodDefinition>>initializeWithClassName:classIsMeta:selector:category:timeStamp:source: (in category 'serializing') -----
initializeWithClassName: classString
classIsMeta: metaBoolean
selector: selectorString
category: catString
timeStamp: timeString
source: sourceString
className := classString asSymbol.
selector := selectorString asSymbol.
+ category := catString ifNil: [Categorizer default] ifNotNil: [catString asSymbol].
- category := catString asSymbol.
timeStamp := timeString.
classIsMeta := metaBoolean.
+ source := sourceString withSqueakLineEndings!
- source := sourceString withSqueakLineEndings.
- !