--- a/SortedCollection.st	Mon Oct 04 11:32:33 1993 +0100
+++ b/SortedCollection.st	Wed Oct 13 01:19:00 1993 +0100
@@ -30,7 +30,7 @@
 while [:a :b | a > b] defines descening order.
 The default sortBlock for SortedCollections is the first one.
 
-%W% %E%
+$Header: /cvs/stx/stx/libbasic/SortedCollection.st,v 1.3 1993-10-13 00:18:26 claus Exp $
 '!
 
 !SortedCollection class methodsFor:'initialization'!