Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.878.mcz
==================== Summary ====================
Name: Tools-mt.878 Author: mt Time: 19 August 2019, 5:19:44.388665 pm UUID: 3d876f65-8c0f-2643-a695-a1d14e93dd69 Ancestors: Tools-mt.877
Adds missing support for class comments to label styling. Such comments are typically disguised in code-browsing tools using method references with the #Comment selector.
Thanks to ct for the tip!
=============== Diff against Tools-mt.877 ===============
Item was changed: ----- Method: CodeHolder>>formattedLabel:forSelector:inClass: (in category 'message list') ----- formattedLabel: aString forSelector: aSymbol inClass: aClass "Show deprecated messages differently so that users recognize them quickly to avoid them." | formattedLabel | + (aSymbol = #Definition or: [aSymbol = #Comment]) - aSymbol = #Definition ifTrue: [aClass isDeprecated ifFalse: [^ aString]] ifFalse: [(aClass isDeprecated or: [(aClass compiledMethodAt: aSymbol ifAbsent: [^ aString]) isDeprecated]) ifFalse: [^ aString]]. formattedLabel := aString asText. (self userInterfaceTheme deprecatedMessageAttributes ifNil: [{TextColor gray. TextEmphasis struckOut}]) do: [:textAttribute | formattedLabel addAttribute: textAttribute].
^ formattedLabel.!
packages@lists.squeakfoundation.org