MenuEditor.st
changeset 1506 6525741c998e
parent 1499 0c57ab09156b
child 1539 3e6fd1cb8eae
equal deleted inserted replaced
1505:1577ee65ddc7 1506:6525741c998e
  2189 
  2189 
  2190 updateChannels
  2190 updateChannels
  2191     "update channels"
  2191     "update channels"
  2192 
  2192 
  2193     |node parent next prev state canPaste selectedNodes firstParent
  2193     |node parent next prev state canPaste selectedNodes firstParent
  2194      enableMovingOut enableMovingIn indices indexOfLast|
  2194      enableMovingOut enableMovingIn indexOfLast|
  2195 
  2195 
  2196     enableMovingOut := enableMovingIn := false.
  2196     enableMovingOut := enableMovingIn := false.
  2197 
  2197 
  2198     state := false.   
  2198     state := false.   
  2199     node  := treeView selectedNode.
  2199     node  := treeView selectedNode.
  2454 !
  2454 !
  2455 
  2455 
  2456 tabSelection:aSelection
  2456 tabSelection:aSelection
  2457     "put the section aSelection into the note book
  2457     "put the section aSelection into the note book
  2458     "
  2458     "
  2459     |view spec|
  2459     |view|
  2460 
  2460 
  2461     aSelection = tabSelection ifTrue:[^self].
  2461     aSelection = tabSelection ifTrue:[^self].
  2462 
  2462 
  2463     (tabSelection := aSelection) isNil ifTrue:[
  2463     (tabSelection := aSelection) isNil ifTrue:[
  2464         tabSelection == 0 ifTrue:[^ self].
  2464         tabSelection == 0 ifTrue:[^ self].