--- a/Set.st	Thu Apr 25 18:12:44 1996 +0200
+++ b/Set.st	Thu Apr 25 18:20:46 1996 +0200
@@ -59,20 +59,23 @@
 
     Examples:
 
-	|s|
-	s := Set new.
-	s add:'hello'.
-	s add:'world'.
-	s add:#foo.
-	s add:1.2345678.
-	s add:'hello'.
+        |s|
+        s := Set new.
+        s add:'hello'.
+        s add:'world'.
+        s add:#foo.
+        s add:1.2345678.
+        s add:'hello'.
 
-	s printNL.
-	's size -> ' print. s size printNL.
-	'(s includes:''hello'') -> ' print. (s includes:'hello') printNL.
-	'(s includes:#foo)    -> ' print. (s includes:#foo) printNL.
-	'(s includes:''foo'')   -> ' print. (s includes:'foo') printNL.
-	'(s includes:#bar)    -> ' print. (s includes:#bar) printNL.
+        s printNL.
+        's size -> ' print. s size printNL.
+        '(s includes:''hello'') -> ' print. (s includes:'hello') printNL.
+        '(s includes:#foo)    -> ' print. (s includes:#foo) printNL.
+        '(s includes:''foo'')   -> ' print. (s includes:'foo') printNL.
+        '(s includes:#bar)    -> ' print. (s includes:#bar) printNL.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -650,6 +653,6 @@
 !Set class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.34 1996-04-12 16:55:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.35 1996-04-25 16:19:05 cg Exp $'
 ! !
 Set initialize!