class: Tools::ChangeList
changed: #hasChangeSelectedAndNotRemoved (send #conform: instead of #allSatisfy:)
--- a/Tools__ChangeList.st Fri Sep 06 00:48:24 2013 +0200
+++ b/Tools__ChangeList.st Fri Sep 06 01:18:30 2013 +0200
@@ -960,11 +960,10 @@
!
hasChangeSelectedAndNotRemoved
+ | selection |
- | selection |
selection := self selectionHolder value ? #().
- ^selection size > 0 and:
- [selection allSatisfy:[:e|e removed not]].
+ ^selection size > 0 and: [selection conform:[:e|e removed not]].
!
hasSingleChangeSelected
@@ -1201,14 +1200,14 @@
!ChangeList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.25 2013-09-05 10:46:11 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.26 2013-09-05 23:18:30 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.25 2013-09-05 10:46:11 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.26 2013-09-05 23:18:30 cg Exp $'
!
version_SVN
- ^ '§Id: Tools__ChangeList.st 7486 2009-10-26 22:06:24Z vranyj1 §'
+ ^ '$Id: Tools__ChangeList.st,v 1.26 2013-09-05 23:18:30 cg Exp $'
! !