[Pkg] The Trunk: Morphic-ct.2055.mcz

[commits at source.squeak.org]

Christoph Thiede uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ct.2055.mcz

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

Name: Morphic-ct.2055
Author: ct
Time: 25 November 2022, 6:21:43.230214 pm
UUID: 6142d161-9038-804c-84d2-2b390ba17fcc
Ancestors: Morphic-ct.2054

Complements Tools-ct.1179 (drop-in-world support for classes in change sorters).

=============== Diff against Morphic-ct.2054 ===============

Item was changed:
  ----- Method: PasteUpMorph>>dropSourceCode:event: (in category 'event handling') -----
  dropSourceCode: anObject event: evt
  
  	(anObject isMethodReference and: [anObject isValid])
  		ifTrue: [^ self dropSourceCode: anObject compiledMethod event: evt].
+ 	(anObject isClassReference and: [anObject isValid])
+ 		ifTrue: [^ self dropSourceCode: anObject actualClass event: evt].
  	
  	(anObject isBehavior or: [anObject isCompiledMethod])
  		ifTrue: [
  			| tool window |
  			tool := anObject isBehavior
  				ifTrue: [Browser new
  					setClass: anObject]
  				ifFalse: [CodeHolder new
  					setClass: anObject methodClass
  					selector: anObject selector].
  			window := ToolBuilder open: tool.
  			window center: evt position.
  			window bounds: (window bounds translatedToBeWithin: self bounds)].
  	
  	anObject isString
  		ifTrue: [anObject edit].!