MenuEditor.st
changeset 1067 08d5c0a01e56
parent 1062 15184a3a00e1
child 1069 7196ca547f5d
equal deleted inserted replaced
1066:5096f66ba82d 1067:08d5c0a01e56
  3042 !MenuEditor::TreeView methodsFor:'drawing basics'!
  3042 !MenuEditor::TreeView methodsFor:'drawing basics'!
  3043 
  3043 
  3044 redrawLabelAt:x y:yTop index:anIndex
  3044 redrawLabelAt:x y:yTop index:anIndex
  3045     "draw text label assigned to a node at x y( center)"
  3045     "draw text label assigned to a node at x y( center)"
  3046 
  3046 
  3047     |isSelected y0 x0 x1 maxX w label type item|
  3047     |isSelected y0 x0 x1 w type item|
  3048 
  3048 
  3049     item := (listOfNodes at:anIndex) contents.
  3049     item := (listOfNodes at:anIndex) contents.
  3050     type := item separatorType.
  3050     type := item separatorType.
  3051 
  3051 
  3052     type isNil ifTrue:[
  3052     type isNil ifTrue:[