code cleanup: no need to generate changeSets twice.
--- 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!