--- a/Autoload.st	Mon May 22 15:13:07 2017 +0200
+++ b/Autoload.st	Mon May 22 18:34:01 2017 +0200
@@ -71,13 +71,13 @@
     and installs autoload stubs for all .st class files found, for which no
     corresponding class is already present.
     As you can imagine, this takes a long time and makes the initial startup quite slow.
-    Therefore, this scheme is no longer the recommended one and we (at exept)
+    Therefore, this scheme is no longer the recommended one and we (at eXept)
     always start ST/X with the '--quick' option, which skips this scan operation.
-    Late note: 
-        --quick is now (7.1.1) the default. 
+    Late note:
+        --quick is now (7.1.1) the default.
         To force an autoload scan, start stx with a --autoload argument.
-    
-    
+
+
     Advantage of Autoload stubs:
     Autoload stubs make it easier for a beginner to ST/X, to see what frameworks and classes
     are there, as they appear in the browser with category and class name (although no
@@ -111,7 +111,7 @@
 
 initialize
     "initialize either the Autoload class
-     or load a autoloaded class and initialize it."
+     or load an autoloaded class and initialize it."
 
     self ~~ Autoload ifTrue:[
         "subclass: catch initialize - load the class and resend #initialize to the real one"
@@ -136,9 +136,9 @@
         InProgressClasses := IdentitySet new.
     ].
 
-
-    "Modified: / 20.5.1997 / 19:06:25 / cg"
-    "Modified: / 3.8.1999 / 14:23:30 / stefan"
+    "Modified: / 20-05-1997 / 19:06:25 / cg"
+    "Modified: / 03-08-1999 / 14:23:30 / stefan"
+    "Modified (comment): / 22-05-2017 / 18:31:47 / mawalch"
 ! !
 
 !Autoload class methodsFor:'Signal constants'!
@@ -543,9 +543,11 @@
 !Autoload class methodsFor:'message catching'!
 
 at:arg
-    "catch at: - redefined because its understood"
+    "catch at: - redefined because it is understood"
 
     ^ self doesNotUnderstand:(Message selector:#at: argument:arg)
+
+    "Modified (comment): / 22-05-2017 / 18:31:12 / mawalch"
 !
 
 basicNew
@@ -631,11 +633,12 @@
 !
 
 new:arg
-    "catch new: - load the class and resend #new: it to the real one"
+    "catch new: - load the class and resend #new: to the real one"
 
     ^ self doesNotUnderstand:(Message selector:#new: argument:arg)
 
-    "Modified: 26.5.1997 / 14:59:58 / cg"
+    "Modified: / 26-05-1997 / 14:59:58 / cg"
+    "Modified (comment): / 22-05-2017 / 18:32:43 / mawalch"
 !
 
 privateClassesAt:aClassNameString
@@ -680,14 +683,15 @@
 !
 
 respondsTo:aSelector
-    "catch respondsTo: - load the class and resend #respondsTo: it to the real one"
+    "catch respondsTo: - load the class and resend #respondsTo: to the real one"
 
     self == Autoload ifTrue:[
         ^ super respondsTo:aSelector
     ].
     ^ self doesNotUnderstand:(Message selector:#respondsTo: argument:aSelector)
 
-    "Modified: 26.5.1997 / 14:59:58 / cg"
+    "Modified: / 26-05-1997 / 14:59:58 / cg"
+    "Modified (comment): / 22-05-2017 / 18:33:08 / mawalch"
 !
 
 value