--- a/InfoBox.st	Sat Apr 27 20:13:37 1996 +0200
+++ b/InfoBox.st	Sat Apr 27 20:21:37 1996 +0200
@@ -96,55 +96,62 @@
     Since this type of information is pretty common, a convenient information
     method has been added to Object.
     Thus, you can use:
-
+                                                                        [exBegin]
         self information:'hello world'
+                                                                        [exEnd]
 
     everwhere in your program.
     for ST-80 compatibility, you can also use:
-
+                                                                        [exBegin]
         Dialog information:'hello world'
+                                                                        [exEnd]
 
 
 
     standard box:
-
+                                                                        [exBegin]
         |box|
 
         box := InfoBox title:'hello world '.
         box open
+                                                                        [exEnd]
 
 
     changing the buttons label:
-
+                                                                        [exBegin]
         |box|
 
         box := InfoBox title:'hello world '.
         box okText:'wow'.
         box open
+                                                                        [exEnd]
 
 
     changing the icon:
 
-        |box|
+                                                                        [exBegin]
+|box|
 
         box := InfoBox title:'hello world '.
         box image:(Image fromFile:'bitmaps/SBrowser.xbm').
         box okText:'wow'.
         box open
+                                                                        [exEnd]
 
     or even:
-
+                                                                        [exBegin]
         |box|
 
         box := InfoBox title:'hello garfield '.
         box image:((Image fromFile:'bitmaps/garfield.gif') magnifiedTo:200@100).
         box okText:'wow'.
         box open
+                                                                        [exEnd]
 
 
     If you plan to use boxes as in the last example, you may want to
     keep the box around for reuse (since the image magnification takes some time).
-
+                                                                        [exBegin]
         |box|
 
         box := InfoBox title:'hello garfield '.
@@ -154,6 +161,7 @@
 
         box title:'hello again'.
         box open
+                                                                        [exEnd]
 
 "
 ! !
@@ -339,5 +347,5 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.28 1996-04-25 17:19:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.29 1996-04-27 18:15:33 cg Exp $'
 ! !