UILayoutTool.st
changeset 1726 7117789f3020
parent 1709 f5bb3fc6e05a
child 1738 bdb5bedd2b57
equal deleted inserted replaced
1725:2de97eb77984 1726:7117789f3020
   880 selection
   880 selection
   881     ^ selection
   881     ^ selection
   882 !
   882 !
   883 
   883 
   884 selection:aSelection
   884 selection:aSelection
   885     |appl slice sel noteBook key view|
   885     |appl slice sel key view|
   886 
   886 
   887     aSelection isNumber ifTrue:[
   887     aSelection isNumber ifTrue:[
   888         aSelection ~~ 0 ifTrue:[sel := tabList at:aSelection]
   888         aSelection ~~ 0 ifTrue:[sel := tabList at:aSelection]
   889     ] ifFalse:[
   889     ] ifFalse:[
   890         sel := aSelection
   890         sel := aSelection