--- a/ChangesBrowser.st	Sat Nov 05 13:05:15 2016 +0100
+++ b/ChangesBrowser.st	Sat Nov 05 13:59:58 2016 +0100
@@ -98,7 +98,7 @@
         overall structure. Do not take this as an example for good style ;-)
 
         The Change hierarchy is currently been completed, and the changes browser
-        will be adapted soon.
+        should be adapted soon.
 
     [author:]
         Claus Gittinger
@@ -6494,17 +6494,11 @@
                             selector:nil headerLine:nil timestamp:timeStampInfo isFollowupChange:true. 
                 changeInfo add:info.
 
-"/                changeChunks add:chunkText.
-"/                changeClassNames add:clsName.
-"/                changePositions add:methodPos.
-"/                changeTimeStamps add:timeStampInfo.
-"/                changeIsFollowupMethodChange add:true.
                 askedForEditingClassSource ifFalse:[
                     thisIsAClassSource := (changeFileName asFilename hasSuffix:'st').
                     askedForEditingClassSource := true.
                 ]
             ] ifTrue:[
-"/                changeClassNames at:changeClassNames size put:clsName.
                 changeInfo last className:clsName
             ].
 
@@ -6553,11 +6547,15 @@
                 ].
 
                 autoCompare value ifTrue:[
-                    changeDelta := ChangeDeltaInformation changeDeltaFor:text changeClass:changeClass selector:methodSelector.
+                    changeDelta := ChangeDeltaInformation 
+                                        changeDeltaFor:text changeClass:changeClass selector:methodSelector.
                 ].
             ].
-            changeInfo last headerLine:(self headerLineForChangeType:changeType changeString:changeString changeDelta:changeDelta timeStampInfo:timeStampInfo).
-"/            self addHeaderLineForChangeType:changeType changeString:changeString changeDelta:changeDelta timeStampInfo:timeStampInfo.
+            changeInfo last 
+                headerLine:(self headerLineForChangeType:changeType 
+                                 changeString:changeString
+                                 changeDelta:changeDelta
+                                 timeStampInfo:timeStampInfo).
         ].
         changeString := nil.
         headerLine := nil.