Move rest of menuHolder/menuPerformer stuff to View.
authorStefan Vogel <sv@exept.de>
Fri, 03 Jan 1997 03:05:13 +0100
changeset 910 0446030ce647
parent 909 be8e88881f4d
child 911 22a930d19a9b
Move rest of menuHolder/menuPerformer stuff to View.
TextView.st
--- 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 $'
 ! !