--- a/VersionDiffBrowser.st	Mon Jan 01 16:10:49 2018 +0100
+++ b/VersionDiffBrowser.st	Tue Jan 02 21:49:13 2018 +0100
@@ -3471,7 +3471,7 @@
 
     [
         theSourceStream := aSource readStream.
-        theChangeSet := ChangeSet fromStream:(theSourceStream := aSource readStream)
+        theChangeSet := ChangeSet fromStream:theSourceStream.
     ] ensure:[
         theSourceStream notNil ifTrue:[
             theSourceStream close
@@ -3483,6 +3483,8 @@
     ].
     self sortChangeSet:theChangeSet.
     ^ theChangeSet
+
+    "Modified: / 02-01-2018 / 20:41:55 / stefan"
 !
 
 newForClass:aClass againstVersion:aVersionA