diff -r ebc382a8d67f -r 856dc62f02d7 VersionDiffBrowser.st --- a/VersionDiffBrowser.st Thu Nov 16 18:35:09 2000 +0100 +++ b/VersionDiffBrowser.st Thu Nov 16 18:57:13 2000 +0100 @@ -537,8 +537,13 @@ theBrowser allButOpen. theBrowser setupForClass:aClass labelA:aLabelA sourceA:aSourceA labelB:aLabelB sourceB:aSourceB. sameAction notNil ifTrue:[ -self halt. - theBrowser classChangeSet + "/ check if same ... + (theBrowser classChangeSet methodsOnlyInA isEmpty + and:[theBrowser classChangeSet methodsOnlyInB isEmpty + and:[theBrowser classChangeSet diffSet isEmpty]]) ifTrue:[ + sameAction value. + ^ self "/ do not open + ] ]. theBrowser openWindow. ^ theBrowser. @@ -1735,5 +1740,5 @@ !VersionDiffBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.36 2000-11-15 18:32:36 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.37 2000-11-16 17:57:13 cg Exp $' ! !