[squeak-dev] The Trunk: Tools-mt.1061.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Jul 21 08:54:35 UTC 2021
Marcel Taeumel uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-mt.1061.mcz
==================== Summary ====================
Name: Tools-mt.1061
Author: mt
Time: 21 July 2021, 10:54:32.505807 am
UUID: 0ac1dc96-237d-4fee-aef8-97dafa9f04af
Ancestors: Tools-eem.1060
Complements System-mt.1240
=============== Diff against Tools-eem.1060 ===============
Item was changed:
----- Method: CodeHolder>>messageHelpForMethod: (in category 'message list') -----
messageHelpForMethod: aMethod
"Answer the formatted help text for a method."
"Show the first n lines of the source code of the method."
| source formatted |
source := aMethod getSource.
+ formatted := (TextStyler for: #Smalltalk)
- formatted := (Smalltalk classNamed: #SHTextStylerST80)
ifNil: [ source asText ]
ifNotNil: [ :textStylerClass |
textStylerClass new
classOrMetaClass: aMethod methodClass;
styledTextFor: source asText ].
^ self messageHelpTruncated: formatted!
Item was changed:
----- Method: Inspector>>initialize (in category 'initialization') -----
initialize
super initialize.
customFields := OrderedCollection new.
selectionIndex := 0.
+ fieldListStyler := (TextStyler for: #Smalltalk)
- fieldListStyler := (Smalltalk classNamed: #SHTextStylerST80)
ifNotNil: [:class | class new].!
More information about the Squeak-dev
mailing list
|