equal
deleted
inserted
replaced
2162 ! |
2162 ! |
2163 |
2163 |
2164 classHistoryMenu |
2164 classHistoryMenu |
2165 "returns a popup menu containing the history of the classes" |
2165 "returns a popup menu containing the history of the classes" |
2166 |
2166 |
|
2167 <resource: #programMenu > |
|
2168 |
2167 |labels selectors args| |
2169 |labels selectors args| |
2168 |
2170 |
2169 self class checkClassHistory. |
2171 self class checkClassHistory. |
2170 |
2172 |
2171 ClassHistory isEmpty |
2173 ClassHistory isEmpty |
2191 labels:(resources string:#('empty history')) |
2193 labels:(resources string:#('empty history')) |
2192 selectors:nil |
2194 selectors:nil |
2193 args:nil |
2195 args:nil |
2194 receiver:self. |
2196 receiver:self. |
2195 ] |
2197 ] |
|
2198 |
|
2199 "Modified: / 21.5.1998 / 15:42:10 / cg" |
2196 ! |
2200 ! |
2197 |
2201 |
2198 emptyClassHistory |
2202 emptyClassHistory |
2199 "removes all class history entries" |
2203 "removes all class history entries" |
2200 |
2204 |
11496 ! ! |
11500 ! ! |
11497 |
11501 |
11498 !BrowserView class methodsFor:'documentation'! |
11502 !BrowserView class methodsFor:'documentation'! |
11499 |
11503 |
11500 version |
11504 version |
11501 ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.409 1998-05-21 13:37:58 cg Exp $' |
11505 ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.410 1998-05-21 13:57:22 cg Exp $' |
11502 ! ! |
11506 ! ! |
11503 BrowserView initialize! |
11507 BrowserView initialize! |