[Pkg] The Trunk: Monticello-ar.378.mcz

[commits at source.squeak.org]

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]!