Tools__ChangeList.st
changeset 13937 92692b01ed8e
parent 13929 7447bbfa1126
child 13970 d280c182f218
equal deleted inserted replaced
13936:93271eb5f45b 13937:92692b01ed8e
   840     "Superclass Tools::BrowserList says that I am responsible to implement this method"
   840     "Superclass Tools::BrowserList says that I am responsible to implement this method"
   841 
   841 
   842     ^Iterator on:
   842     ^Iterator on:
   843         [:whatToDo|
   843         [:whatToDo|
   844 
   844 
   845         selectionHolder value do:
   845         (selectionHolder value ? #()) do:
   846             [:changeListItem| | change |
   846             [:changeListItem| | change |
   847             change := changeListItem change.
   847             change := changeListItem change.
   848             change isCompositeChange ifTrue:
   848             change isCompositeChange ifTrue:
   849                 [change changes do: whatToDo]]].
   849                 [change changes do: whatToDo]]].
   850 
   850 
  1541 ! !
  1541 ! !
  1542 
  1542 
  1543 !ChangeList class methodsFor:'documentation'!
  1543 !ChangeList class methodsFor:'documentation'!
  1544 
  1544 
  1545 version
  1545 version
  1546     ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.29 2014-02-13 11:24:32 stefan Exp $'
  1546     ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.30 2014-02-14 00:24:33 cg Exp $'
  1547 !
  1547 !
  1548 
  1548 
  1549 version_CVS
  1549 version_CVS
  1550     ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.29 2014-02-13 11:24:32 stefan Exp $'
  1550     ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeList.st,v 1.30 2014-02-14 00:24:33 cg Exp $'
  1551 !
  1551 !
  1552 
  1552 
  1553 version_SVN
  1553 version_SVN
  1554     ^ '$Id: Tools__ChangeList.st,v 1.29 2014-02-13 11:24:32 stefan Exp $'
  1554     ^ '$Id: Tools__ChangeList.st,v 1.30 2014-02-14 00:24:33 cg Exp $'
  1555 ! !
  1555 ! !
  1556 
  1556