[Pharo-users] [Spec] List and notebook page

March 29, 2020

      Hi,

I refactor a bit the code, to have a slightly better behavior.

I send the #display: message at the time the list is installed in the 
notebook page:

*newMethodsList Â Â Â  methods := self newNotebook. Â Â Â  methods Â Â Â  Â Â Â  
addPage: self instanceMethodsTab; Â Â Â  Â Â Â  addPage: self classMethodsTab*

*instanceMethodsTab Â Â Â  ^ SpNotebookPage Â Â Â  Â Â Â  title: 'Methods' 
translated Â Â Â  Â Â Â  provider: [ self newList Â Â Â  Â Â Â  Â Â Â  display: 
[:aMethod | aMethod selector ]; Â Â Â  Â Â Â  Â Â Â  yourself]*

*classMethodsTab Â Â Â  ^ SpNotebookPage Â Â Â  Â Â Â  title: 'Script data' 
translated Â Â Â  Â Â Â  provider: [ self newList Â Â Â  Â Â Â  Â Â Â  display: 
[:aMethod | aMethod selector ]; Â Â Â  Â Â Â  Â Â Â  yourself]*

Then I connect the presenters:

*connectPresenters Â Â Â  scripts whenSelectedItemChanged: [ :class | Â Â Â  
 Â Â Â  methods resetAllPageContents. Â Â Â  Â Â Â  (methods pageAt: 1) 
whenRetrievedDo: [ :listÂ  |Â  listÂ  items:Â  class methods]. Â Â Â  Â Â Â  
(methods pageAt: 2) whenRetrievedDo: [ :listÂ  | listÂ  items:Â  class 
class methods]. Â Â Â  Â Â Â  methods selectPageIndex: 1. Â Â Â  Â Â Â  sourceÂ Â Â  
 Â clearContent ].*

The behavior is mostly as expected, but when the I click for the first 
time on a script at the left, the notebook list in page 1 is not updated 
(empty):

Then when I click a second time on another script it is updated, then 
also in the first clicked script:

Any idea ?

I joined the complete class too.

Thanks. Keep safe.

Hilaire

-- 
Dr. Geo
http://drgeo.eu