UIBuilder.st
changeset 721 1889d708a951
parent 667 fe63e8ecb0d3
child 734 f1079f443a75
--- a/UIBuilder.st	Tue Oct 28 20:04:58 1997 +0100
+++ b/UIBuilder.st	Tue Oct 28 20:14:37 1997 +0100
@@ -12,7 +12,7 @@
 
 WindowBuilder subclass:#UIBuilder
 	instanceVariableNames:'view currentMenuSelector menuAspect spec specStack composite
-		lastComponent compositeView'
+		lastComponent compositeView menuBar'
 	classVariableNames:'Verbose'
 	poolDictionaries:''
 	category:'Interface-Support-UI'
@@ -78,6 +78,22 @@
 
 menuAspect
     ^ menuAspect
+!
+
+menuBar
+    "return the value of the instance variable 'menuBar' (automatically generated)"
+
+    ^ menuBar
+
+    "Created: / 27.10.1997 / 16:30:12 / cg"
+!
+
+menuBar:something
+    "set the value of the instance variable 'menuBar' (automatically generated)"
+
+    menuBar := something.
+
+    "Created: / 27.10.1997 / 16:30:13 / cg"
 ! !
 
 !UIBuilder methodsFor:'building'!
@@ -305,6 +321,6 @@
 !UIBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.27 1997-07-17 10:09:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.28 1997-10-28 19:14:37 cg Exp $'
 ! !
 UIBuilder initialize!