--- a/Tools__NewSystemBrowser.st	Mon Sep 12 17:27:42 2011 +0200
+++ b/Tools__NewSystemBrowser.st	Mon Sep 12 18:33:28 2011 +0200
@@ -15153,6 +15153,7 @@
     "Created: / 24.2.2000 / 23:28:06 / cg"
 ! !
 
+
 !NewSystemBrowser methodsFor:'aspects-organization'!
 
 categoryMenuVisible
@@ -18443,6 +18444,7 @@
     ^ UserPreferences current useSearchBarInBrowser or:[self codeView searchBarActionBlock notNil]
 ! !
 
+
 !NewSystemBrowser methodsFor:'change & update'!
 
 categorySelectionChanged
@@ -38816,6 +38818,21 @@
 
 !NewSystemBrowser methodsFor:'menu actions-subversion-class'!
 
+classMenuDiffsetFor:classes againstBranch:branch revision:revision
+    |diffset|
+    diffset := (ChangeSetDiffSet new)
+                name:'Differences between image and ', branch name asString , '@' , revision printString;
+                versionALabel: 'Current (image)';
+                versionBLabel: revision printString.
+    classes do:
+            [:cls |
+            diffset add:(branch diffSetForClass:cls betweenImageAndRevision:revision)].
+    ^diffset
+
+    "Created: / 19-04-2008 / 18:56:08 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 12-09-2011 / 15:33:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 classMenuSubversionShowRevisionLog
 
     | pkg classes branch path |
@@ -38833,6 +38850,7 @@
     "Modified: / 25-06-2010 / 10:08:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
 !NewSystemBrowser methodsFor:'menu actions-variables'!
 
 browseVarRefsOrModsWithTitle:browserTitle boxTitle:boxTitle variables:varType access:accessType all:browseAll
@@ -45193,6 +45211,7 @@
     ^ navigationState projectListApplication
 ! !
 
+
 !NewSystemBrowser methodsFor:'private-history'!
 
 lastSearchPatterns
@@ -50279,11 +50298,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1612 2011-09-12 14:16:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1613 2011-09-12 16:33:28 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1612 2011-09-12 14:16:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1613 2011-09-12 16:33:28 vrany Exp $'
 !
 
 version_SVN