equal
deleted
inserted
replaced
1518 !UIPainterView methodsFor:'menus'! |
1518 !UIPainterView methodsFor:'menus'! |
1519 |
1519 |
1520 showMiddleButtonMenu |
1520 showMiddleButtonMenu |
1521 "show the middle button menu; this returns nil |
1521 "show the middle button menu; this returns nil |
1522 " |
1522 " |
|
1523 |
|
1524 |m| |
|
1525 |
1523 self enabled ifTrue:[ |
1526 self enabled ifTrue:[ |
1524 (MenuPanel fromSpec:(UIPainter menuEdit) receiver:self superView application) startUp |
1527 m := MenuPanel fromSpec:(UIPainter menuEdit) receiver:self superView application. |
|
1528 self startUpMenu:m |
1525 ]. |
1529 ]. |
1526 ^ nil |
1530 ^ nil |
1527 |
|
1528 |
|
1529 |
|
1530 ! ! |
1531 ! ! |
1531 |
1532 |
1532 !UIPainterView methodsFor:'private handles'! |
1533 !UIPainterView methodsFor:'private handles'! |
1533 |
1534 |
1534 showSelected:aComponent |
1535 showSelected:aComponent |