--- a/Tools__ChangeSetDiffTool.st	Fri May 23 10:30:44 2014 +0200
+++ b/Tools__ChangeSetDiffTool.st	Fri May 23 10:44:59 2014 +0200
@@ -2610,16 +2610,18 @@
     loadA disable.
     loadB := menu atNameKey:#LoadVersionB.
     loadB disable.
+    "/ cg: what is the purpose of this select?
     (diffs select:[:e | true ]) do:[:diff | 
         diff versionA 
             ifNotNil:[
-                loadA enable.
-                loadA label:'Load version ' , diff versionALabel
+                loadA 
+                    label:('Load version ' , diff versionALabel);
+                    enable.
             ].
         diff versionB 
             ifNotNil:[
                 loadB
-                    label:'Load version ' , diff versionBLabel;
+                    label:('Load version ' , diff versionBLabel);
                     enable
             ].
     ].
@@ -3954,10 +3956,10 @@
 !ChangeSetDiffTool class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffTool.st,v 1.7 2014-02-05 19:09:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffTool.st,v 1.8 2014-05-23 08:44:59 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__ChangeSetDiffTool.st,v 1.7 2014-02-05 19:09:04 cg Exp $'
+    ^ '$Id: Tools__ChangeSetDiffTool.st,v 1.8 2014-05-23 08:44:59 cg Exp $'
 ! !