--- a/OrderedDictionary.st	Tue Mar 26 11:54:13 2019 +0100
+++ b/OrderedDictionary.st	Tue Mar 26 11:54:16 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT.
  This is a Manchester Goodie protected by copyright.
@@ -250,10 +252,13 @@
     indexCollection do:[:index | self at:(order at: index) put:anObject]
 !
 
-atAllPut: anObject 
-    "Put anObject into the value field of every association in the dictionary"
+atAllPut:anObject 
+    "Put anObject into the value field of every association in the dictionary.
+     Return the receiver."
 
     order do:[:key | super at: key put:anObject]
+
+    "Modified (comment): / 26-03-2019 / 11:53:17 / Claus Gittinger"
 !
 
 atIndex:index