equal
deleted
inserted
replaced
904 ^ menu |
904 ^ menu |
905 |
905 |
906 |
906 |
907 ! ! |
907 ! ! |
908 |
908 |
909 !PullDownMenu methodsFor:'drawing '! |
909 !PullDownMenu methodsFor:'drawing'! |
910 |
910 |
911 drawActiveTitleSelected:selected |
911 drawActiveTitleSelected:selected |
912 |x| |
912 |x| |
913 activeMenuNumber notNil ifTrue:[ |
913 activeMenuNumber notNil ifTrue:[ |
914 x := self titleLenUpTo:activeMenuNumber. |
914 x := self titleLenUpTo:activeMenuNumber. |
1800 ! ! |
1800 ! ! |
1801 |
1801 |
1802 !PullDownMenu class methodsFor:'documentation'! |
1802 !PullDownMenu class methodsFor:'documentation'! |
1803 |
1803 |
1804 version |
1804 version |
1805 ^ '$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.91 2000-02-11 14:56:25 cg Exp $' |
1805 ^ '$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.92 2000-02-12 15:34:34 cg Exp $' |
1806 ! ! |
1806 ! ! |