--- a/Tools__ChangeSetBrowser2.st	Fri Jan 18 00:33:28 2013 +0000
+++ b/Tools__ChangeSetBrowser2.st	Mon Jan 21 17:40:09 2013 +0000
@@ -2337,9 +2337,7 @@
 
     "Created: / 07-09-2011 / 15:54:03 / cg"
     "Created: / 11-02-2012 / 22:40:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
- !
+! !
 
 !ChangeSetBrowser2 methodsFor:'aspects-queries'!
 
@@ -3199,17 +3197,17 @@
 '.
 
     LastSelectionConditionString isNil ifTrue:[
-	LastSelectionConditionString := template.
+        LastSelectionConditionString := template.
     ].
 
 
     textHolder := ValueHolder new.
     dialog := Dialog
-		 forRequestText:(resources string:'Enter condition for selection')
-		 lines:20
-		 columns:70
-		 initialAnswer:LastSelectionConditionString
-		 model:textHolder.
+                 forRequestText:(resources string:'Enter condition for selection')
+                 lines:20
+                 columns:70
+                 initialAnswer:LastSelectionConditionString
+                 model:textHolder.
     dialog addButton:(Button label:'Template' action:[textHolder value:template. textHolder changed:#value.]).
     dialog open.
     dialog accepted ifFalse:[^ self].
@@ -3219,14 +3217,14 @@
 
     conditionBlock := Parser evaluate:conditionBlockString.
     conditionBlock isBlock ifFalse:[
-	self error:'Bad selection block (syntax error?)'.
-	^ self
+        self error:'Bad selection block (syntax error?)'.
+        ^ self
     ].
 
-    self changeMenuSelectIn: changeList suchThat: conditionBlock
-
-    "Modified: / 29-10-2010 / 13:05:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    self changeMenuSelectIn: changeList suchThat: [:change|conditionBlock value: change change].
+
     "Created: / 04-08-2011 / 17:42:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 21-01-2013 / 17:13:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 changeMenuUndeleteSelection: changeList
@@ -3332,6 +3330,7 @@
     changeList selectionHolder value: sel.
 
     "Created: / 04-08-2011 / 17:29:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 21-01-2013 / 17:12:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSetBrowser2 methodsFor:'private'!
@@ -3792,6 +3791,12 @@
     ^ '§Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.43 2012/12/14 09:09:51 stefan Exp §'
 !
 
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+!
+
 version_SVN
-    ^ '$Id: Tools__ChangeSetBrowser2.st 8083 2013-01-14 11:48:37Z vranyj1 $'
+    ^ '§Id: Tools__ChangeSetBrowser2.st 8083 2013-01-14 11:48:37Z vranyj1 §'
 ! !
+