--- a/Set.st	Fri Mar 17 11:58:43 2017 +0100
+++ b/Set.st	Fri Mar 17 11:58:52 2017 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
@@ -833,7 +835,6 @@
 ! !
 
 
-
 !Set methodsFor:'obsolete set operations'!
 
 + aCollection
@@ -1300,10 +1301,11 @@
 capacity 
     "return the number of elements, that the receiver is prepared to take w.o. resizing.
      Notice, that Sets do automatically resize as required, 
-     so knowing the capacity is of no real use.
-     Not used by the system; added for ST-80 compatibility."
+     so knowing the capacity is of no real use."
 
     ^ keyArray size
+
+    "Modified (comment): / 17-03-2017 / 11:50:16 / stefan"
 !
 
 includes:anObject