The Trunk: Monticello-ar.378.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Monticello-ar.378.mcz

commits-2
Andreas Raab uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-ar.378.mcz

==================== Summary ====================

Name: Monticello-ar.378
Author: ar
Time: 5 March 2010, 8:57:45.743 pm
UUID: 11c87d12-a581-594d-9600-79b0b27a97b7
Ancestors: Monticello-ar.377

Avoid dictionary protocol in Smalltalk.

=============== Diff against Monticello-ar.377 ===============

Item was changed:
  ----- Method: MCPackageLoader>>provisions (in category 'private') -----
  provisions
+ ^ provisions ifNil: [provisions := Set withAll: Smalltalk globals keys]!
- ^ provisions ifNil: [provisions := Set withAll: Smalltalk keys]!

Item was changed:
  ----- Method: MCCodeTool>>browseFullProtocol (in category 'menus') -----
  browseFullProtocol
  "Open up a protocol-category browser on the value of the receiver's current selection.    If in mvc, an old-style protocol browser is opened instead.  Someone who still uses mvc might wish to make the protocol-category-browser work there too, thanks."
 
  | aClass |
 
+ (Smalltalk isMorphic and: [Smalltalk hasClassNamed: #Lexicon]) ifFalse: [^ self spawnFullProtocol].
- (Smalltalk isMorphic and: [Smalltalk includesKey: #Lexicon]) ifFalse: [^ self spawnFullProtocol].
  (aClass := self selectedClassOrMetaClass) ifNotNil:
  [(Smalltalk at: #Lexicon) new openOnClass: aClass inWorld: ActiveWorld showingSelector: self selectedMessageName]!