--- a/Separator.st	Sat Apr 27 20:18:07 1996 +0200
+++ b/Separator.st	Sat Apr 27 20:20:27 1996 +0200
@@ -53,7 +53,7 @@
 examples
 "
   a separator between two button-panels:
-
+                                                                        [exBegin]
     |top p1 p2 sep|
 
     top := StandardSystemView new.
@@ -78,10 +78,11 @@
     (Button label:'six' in:p2) width:0.2.
 
     top open
+                                                                        [exEnd]
 
 
   vertical:
-
+                                                                        [exBegin]
     |top p1 p2 sep|
 
     top := StandardSystemView new.
@@ -106,10 +107,11 @@
     (Button label:'six' in:p2) width:0.4.
 
     top open
+                                                                        [exEnd]
 
 
   with multiple horizontal seps in a panel:
-
+                                                                        [exBegin]
     |top p sep|
 
     top := StandardSystemView new.
@@ -137,6 +139,7 @@
     (Button label:'six' in:p).
 
     top open
+                                                                        [exEnd]
 "
 ! !
 
@@ -190,5 +193,5 @@
 !Separator class methodsFor:'documentation'!
 
 version 
-    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.9 1996-04-25 17:26:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.10 1996-04-27 18:20:27 cg Exp $'
 ! !