equal
deleted
inserted
replaced
1440 ! ! |
1440 ! ! |
1441 |
1441 |
1442 !PullDownMenu methodsFor:'queries'! |
1442 !PullDownMenu methodsFor:'queries'! |
1443 |
1443 |
1444 preferredExtent |
1444 preferredExtent |
|
1445 "return my preferredExtent from the title-item widths & font height" |
|
1446 |
1445 |w| |
1447 |w| |
1446 |
1448 |
1447 w := self titleLenUpTo:(titles size + 1). |
1449 w := self titleLenUpTo:(titles size + 1). |
1448 ^ w @ (font height + (font descent * 2) "+ topMargin" + (margin*2)). |
1450 ^ w @ (font height + (font descent * 2) "+ topMargin" + (margin*2)). |
|
1451 |
|
1452 "Modified: 23.4.1996 / 00:17:24 / cg" |
1449 ! ! |
1453 ! ! |
1450 |
1454 |
1451 !PullDownMenu methodsFor:'submenu notifications'! |
1455 !PullDownMenu methodsFor:'submenu notifications'! |
1452 |
1456 |
1453 hideSubmenu |
1457 hideSubmenu |
1480 ! ! |
1484 ! ! |
1481 |
1485 |
1482 !PullDownMenu class methodsFor:'documentation'! |
1486 !PullDownMenu class methodsFor:'documentation'! |
1483 |
1487 |
1484 version |
1488 version |
1485 ^ '$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.46 1996-04-17 20:20:03 cg Exp $' |
1489 ^ '$Header: /cvs/stx/stx/libwidg/Attic/PullDMenu.st,v 1.47 1996-04-22 22:19:32 cg Exp $' |
1486 ! ! |
1490 ! ! |