code cleanup: no need to generate changeSets twice.
authorClaus Gittinger <cg@exept.de>
Wed, 01 Mar 2000 17:15:35 +0100
changeset 2634 a7edd71c40a6
parent 2633 41bd35e18e4e
child 2635 4ac62d4f2346
code cleanup: no need to generate changeSets twice.
BrowserView.st
--- a/BrowserView.st	Tue Feb 29 18:48:07 2000 +0100
+++ b/BrowserView.st	Wed Mar 01 17:15:35 2000 +0100
@@ -4353,7 +4353,7 @@
 
     self doClassMenu:[:currentClass |
         |aStream comparedSource currentSource v rev revString thisRevString mgr
-         nm msg comparedChangeSet currentChangeSet rev2 newestRev
+         nm msg rev2 newestRev
          containerModule containerPackage containerFile rslt|
 
         nm := currentClass name.
@@ -4467,9 +4467,6 @@
 
                 self busyLabel:'comparing  ...' with:nil.
 
-                comparedChangeSet := ChangeSet fromStream:(comparedSource readStream).
-                currentChangeSet := ChangeSet fromStream:(currentSource readStream).
-
                 (UserPreferences current useNewVersionDiffBrowser) ifTrue:[
                     VersionDiffBrowser 
                           openOnClass:currentClass
@@ -14064,6 +14061,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.609 2000-02-24 18:20:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.610 2000-03-01 16:15:35 cg Exp $'
 ! !
 BrowserView initialize!