UIPainter.st
changeset 127 95070ea7ae42
parent 124 98d26d6f01cb
child 129 e3b7b892e732
--- a/UIPainter.st	Mon May 26 13:00:29 1997 +0200
+++ b/UIPainter.st	Mon May 26 13:06:42 1997 +0200
@@ -11,10 +11,21 @@
 
 documentation
 "
-    not yet finished, not yet published, not yet released.
+    GUI-Builder:
+    this class allows the user to build its own applications providing a graphical
+    user interface to buildin components and to define the behavior of the components
+    during runtime. The resulting specifications can be installed as methods on 
+    classes, typically subclasses of an ApplicationModel. These specifications
+    are used by the UIBuilder to generate the application window and its component
+    structues when open the application.
 
     [start with:]
         UIPainter open
+
+    [see also:]
+        UIBuilder
+        ApplicationModel
+        UISpecification
 "
 
 ! !
@@ -361,7 +372,7 @@
            #(#WindowSpec
               #'name:' 'uIPainterView'
               #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #'label:' 'unnamed'
+              #'label:' 'unnamed canvas'
               #'bounds:' #(#Rectangle 0 0 300 223)
           )
           #'component:' 
@@ -1005,7 +1016,7 @@
     ).
 
     painterView := StandardSystemView new.
-    painterView label:'unnamed'.
+    painterView label:'unnamed canvas'.
     painterView extent:300@300.
 
     painter := UIPainterView in:painterView.