--- a/SortedCollection.st	Fri Feb 25 14:03:58 1994 +0100
+++ b/SortedCollection.st	Fri Feb 25 14:05:47 1994 +0100
@@ -30,7 +30,7 @@
 while [:a :b | a > b] defines descening order.
 The default sortBlock for SortedCollections is the first one.
 
-$Header: /cvs/stx/stx/libbasic/SortedCollection.st,v 1.6 1994-01-16 03:46:34 claus Exp $
+$Header: /cvs/stx/stx/libbasic/SortedCollection.st,v 1.7 1994-02-25 13:05:35 claus Exp $
 '!
 
 !SortedCollection class methodsFor:'initialization'!
@@ -166,7 +166,7 @@
 
 includes:anObject
     "return true, if the argument, anObject is in the collection.
-     Redefined, since due to beeing sorted, the inclusion check can
+     Redefined, since due to being sorted, the inclusion check can
      be done with log-n compares i.e. much faster."
 
     |index "{ Class: SmallInteger }"|
@@ -181,7 +181,7 @@
 
 occurrencesOf:anObject
     "return how many times the argument, anObject is in the collection.
-     Redefined, since due to beeing sorted, the range of checked objects
+     Redefined, since due to being sorted, the range of checked objects
      can be limited i.e. it can be done much faster."
 
     |index      "{ Class: SmallInteger }"