Move rest of menuHolder/menuPerformer stuff to View.
--- a/TextView.st Thu Jan 02 17:32:28 1997 +0100
+++ b/TextView.st Fri Jan 03 03:05:13 1997 +0100
@@ -111,6 +111,14 @@
"Created: 1.1.1970 / 14:12:18 / cg"
!
+defaultMenuMessage
+ "This message is the default yo be sent to the menuHolder to get a menu"
+
+ ^ #editMenu
+
+ "Created: 3.1.1997 / 01:52:21 / stefan"
+!
+
updateStyleCache
"extract values from the styleSheet and cache them in class variables"
@@ -768,13 +776,7 @@
super initialize.
contentsWasSaved := false.
- "
- initialize menu to be provided and performed by myself.
- This allows textViews without a model to provide a
- reasonable menu AND allows models to provide their own menu.
- "
- menuHolder := menuPerformer := self.
- menuMsg := #editMenu
+ "Modified: 3.1.1997 / 01:47:00 / stefan"
! !
!TextView methodsFor:'menu actions'!
@@ -2280,5 +2282,5 @@
!TextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.73 1997-01-02 15:51:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.74 1997-01-03 02:05:13 stefan Exp $'
! !