SelectionInListView.st
changeset 4296 ded54b6d30a1
parent 4153 0ab9d09911e6
child 4324 ef15f29888ad
--- a/SelectionInListView.st	Fri Jul 29 12:33:20 2011 +0200
+++ b/SelectionInListView.st	Fri Jul 29 14:17:05 2011 +0200
@@ -1152,6 +1152,17 @@
     returnKeyActionStyle := aSymbol
 !
 
+selectConditionBlock
+    "get the select-conditionBlock; this block is evaluated before 
+     any selection change is performed (passing the to-be-changed item index as arg).
+     The change will not be done, if the block returns false. 
+     For example, this allows confirmation queries in the SystemBrowser"
+
+    ^ selectConditionBlock
+
+    "Created: / 29-07-2011 / 13:16:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 selectConditionBlock:aBlock
     "set the select-conditionBlock; this block is evaluated before 
      any selection change is performed (passing the to-be-changed item index as arg).
@@ -4089,9 +4100,9 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.256 2010-07-01 14:15:38 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.257 2011-07-29 12:17:05 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.256 2010-07-01 14:15:38 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.257 2011-07-29 12:17:05 vrany Exp $'
 ! !