changeset 1726 | 7117789f3020 |
parent 1709 | f5bb3fc6e05a |
child 1738 | bdb5bedd2b57 |
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 |