The Trunk: Tools-eem.787.mcz

Previous Topic Next Topic
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view

The Trunk: Tools-eem.787.mcz

Eliot Miranda uploaded a new version of Tools to project The Trunk:

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

Name: Tools-eem.787
Author: eem
Time: 5 January 2018, 7:15:16.67055 pm
UUID: 04897966-9248-4397-b05b-8adb49bf2420
Ancestors: Tools-eem.786

My favourite Group C car ever.  Fix browseLocalSenders for the class-side.

=============== Diff against Tools-eem.786 ===============

Item was changed:
  ----- Method: StringHolder>>browseLocalSenders (in category '*Tools') -----
+ self selectedClassOrMetaClass ifNotNil:
- self selectedClass ifNotNil:
  [:cls| | token |
  token := UIManager default request: 'browse for selector or literal'.
  token isEmpty ifTrue: [^self].
  Scanner new
  typedScan: token
  do: [:scannedToken :tokenType|
  token := tokenType = #word
  [(Symbol findInterned: token)
  ifNil: [^UIManager default  inform: 'no such selector: ', token]
  ifNotNil: [:symbol| symbol]]
  self systemNavigation browseAllCallsOn: token localTo: cls]]!