--- a/ChangesBrowser.st	Fri Nov 01 17:59:26 1996 +0100
+++ b/ChangesBrowser.st	Fri Nov 01 20:40:13 1996 +0100
@@ -682,22 +682,22 @@
     Processor removeTimedBlock:checkBlock.
     f := changeFileName asFilename.
     (info := f info) isNil ifTrue:[
-	self newLabel:'(unaccessable)'
+        self newLabel:'(unaccessable)'
     ] ifFalse:[
-	(info at:#modified) > changeFileTimestamp ifTrue:[
-	    self newLabel:'(outdated)'.
-	    autoUpdate ifTrue:[
-		self doUpdate
-	    ]
-	] ifFalse:[
-	    self newLabel:''
-	]
+        (info modified) > changeFileTimestamp ifTrue:[
+            self newLabel:'(outdated)'.
+            autoUpdate ifTrue:[
+                self doUpdate
+            ]
+        ] ifFalse:[
+            self newLabel:''
+        ]
     ].
     Processor addTimedBlock:checkBlock afterSeconds:5.
 
     "Created: 8.9.1995 / 19:30:19 / claus"
     "Modified: 8.9.1995 / 19:38:18 / claus"
-    "Modified: 3.12.1995 / 14:14:55 / cg"
+    "Modified: 1.11.1996 / 20:22:56 / cg"
 !
 
 classNameOfChange:changeNr
@@ -1146,7 +1146,7 @@
      since comparing slows down startup time, it is now disabled by
      default and can be enabled via a toggle."
 
-    |aStream maxLen f|
+    |aStream maxLen i f|
 
     editingClassSource := false.
 
@@ -1158,8 +1158,9 @@
 
     self newLabel:'updating ...'.
 
-    changeFileSize := f info at:#size.
-    changeFileTimestamp := f info at:#modified.
+    i := f info.
+    changeFileSize := i size.
+    changeFileTimestamp := i modified.
 
     self withReadCursorDo:[
         |myProcess myPriority|
@@ -1483,7 +1484,7 @@
     self checkIfFileHasChanged
 
     "Modified: 27.8.1995 / 23:06:55 / claus"
-    "Modified: 5.9.1996 / 18:08:42 / cg"
+    "Modified: 1.11.1996 / 20:23:31 / cg"
 !
 
 selectorOfMethodChange:changeNr
@@ -2335,5 +2336,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.92 1996-10-14 19:09:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.93 1996-11-01 19:40:13 cg Exp $'
 ! !