[squeak-dev] The Inbox: Tools-mt.856.mcz

Chris Muller asqueaker at gmail.com
Mon Jul 29 20:36:53 UTC 2019


Pretty cool enhancement to the IDE, and a useful indicator.

+1

PS -- Marcel, is there possibility of indicating an /overridden method/
using some style too?  I'm thinking "bold" (e.g. blacker (would require
making other entries slightly lighter in the theme)) -- ?

On Wed, Jul 24, 2019 at 6:22 AM Marcel Taeumel <marcel.taeumel at hpi.de>
wrote:

> If we want this in Trunk, I would also add support to all UI themes.
>
>
> Best,
> Marcel
>
> Am 24.07.2019 13:18:51 schrieb commits at source.squeak.org <
> commits at source.squeak.org>:
> A new version of Tools was added to project The Inbox:
> http://source.squeak.org/inbox/Tools-mt.856.mcz
>
> ==================== Summary ====================
>
> Name: Tools-mt.856
> Author: mt
> Time: 24 July 2019, 1:18:41.968109 pm
> UUID: 49d7ca18-63b6-4870-acaf-a44ec7c91b84
> Ancestors: Tools-mt.855
>
> In the system browser's message list, show deprecated methods gray and
> struck-out when all message are listed.
>
> =============== Diff against Tools-mt.855 ===============
>
> Item was changed:
> ----- Method: Browser>>messageList (in category 'message list') -----
> messageList
> + "Answer an Array of the message selectors of the currently selected
> message category. If no category is selected or the '-- all --' category is
> selected, return all method selectors. Make deprecated messages look gray
> and struck-out."
> +
> - "Answer an Array of the message selectors of the currently selected
> message category, provided that the messageCategoryListIndex is in proper
> range. Otherwise, answer an empty Array If messageCategoryListIndex is
> found to be larger than the number of categories (it happens!!), it is
> reset to zero."
> - | sel |
> - (sel := self messageCategoryListSelection) ifNil:
> - [
> - ^ self classOrMetaClassOrganizer
> - ifNil: [Array new]
> - ifNotNil: [self classOrMetaClassOrganizer allMethodSelectors]
> - "^ Array new"
> - ].
>
> + ^ (self selectedMessageCategoryName isNil or: [self
> selectedMessageCategoryName = ClassOrganizer allCategory])
> + ifTrue: [
> + self classOrMetaClassOrganizer
> + ifNil: [Array new]
> + ifNotNil: [:organizer | organizer allMethodSelectors collect: [:ea |
> + | method |
> + ea = #messageList ifTrue: [ea] ifFalse: [
> + method := self selectedClassOrMetaClass compiledMethodAt: ea.
> + ((method hasLiteral: #deprecated scanForSpecial: false)
> + or: [method hasLiteral: #deprecated: scanForSpecial: false])
> + ifTrue: [ea asText
> + addAttribute: (TextColor color: Color gray);
> + addAttribute: TextEmphasis struckOut;
> + yourself]
> + ifFalse: [ea]]]]]
> + ifFalse: [
> + (self classOrMetaClassOrganizer listAtCategoryNamed: self
> selectedMessageCategoryName)
> + ifNil: [Array new]]!
> - ^ sel = ClassOrganizer allCategory
> - ifTrue:
> - [self classOrMetaClassOrganizer
> - ifNil: [Array new]
> - ifNotNil: [self classOrMetaClassOrganizer allMethodSelectors]]
> - ifFalse:
> - [(self classOrMetaClassOrganizer listAtCategoryNamed: self
> selectedMessageCategoryName )
> - ifNil: [selectedMessageCategoryName := nil. Array new]]!
>
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20190729/f29379e0/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image.png
Type: image/png
Size: 64284 bytes
Desc: not available
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20190729/f29379e0/attachment-0001.png>


More information about the Squeak-dev mailing list