Tools__ChangeSetBrowser2.st
branchjv
changeset 12249 8c861bdf7f51
parent 12247 1bd3e7f3c9c9
child 12252 2ea15e194087
equal deleted inserted replaced
12248:a97c6f2acc13 12249:8c861bdf7f51
  2865 
  2865 
  2866 changeMenuSelectInversion: changeList
  2866 changeMenuSelectInversion: changeList
  2867 
  2867 
  2868     | oldSel newSel |
  2868     | oldSel newSel |
  2869     oldSel := changeList selection.
  2869     oldSel := changeList selection.
  2870     newSel := oldSel species new.
  2870     newSel := OrderedCollection new.
  2871     changeList list do:[:change|
  2871     changeList list do:[:change|
  2872         (oldSel includes: change) ifFalse:[
  2872         (oldSel includes: change) ifFalse:[
  2873             newSel add: change.
  2873             newSel add: change.
  2874         ]
  2874         ]
  2875     ].
  2875     ].
  3078 
  3078 
  3079 "/    selectionHolder value isEmptyOrNil ifTrue:[
  3079 "/    selectionHolder value isEmptyOrNil ifTrue:[
  3080 "/        (self navigatorChangesetHolder value ? #()) do: aBlock
  3080 "/        (self navigatorChangesetHolder value ? #()) do: aBlock
  3081 "/    ] ifFalse:[
  3081 "/    ] ifFalse:[
  3082         selection2Holder value isEmptyOrNil not
  3082         selection2Holder value isEmptyOrNil not
  3083             ifTrue:[selection2Holder value do: applyBlock]
  3083             ifTrue:[selection2Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]]
  3084             ifFalse:[selection1Holder value do: applyBlock].
  3084             ifFalse:[selection1Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]].
  3085 "/    ].
  3085 "/    ].
  3086     self redrawChangeListViews
  3086     self redrawChangeListViews
  3087 
  3087 
  3088     "Created: / 29-10-2010 / 13:47:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  3088     "Created: / 29-10-2010 / 13:47:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  3089     "Modified: / 08-04-2011 / 10:15:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
  3090     "Modified: / 20-03-2012 / 17:16:40 / cg"
  3089     "Modified: / 20-03-2012 / 17:16:40 / cg"
       
  3090     "Modified: / 18-05-2012 / 09:05:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  3091 !
  3091 !
  3092 
  3092 
  3093 showProgress: label while: block
  3093 showProgress: label while: block
  3094 
  3094 
  3095     self infoPanel progress: label while: [
  3095     self infoPanel progress: label while: [
  3473 ! !
  3473 ! !
  3474 
  3474 
  3475 !ChangeSetBrowser2 class methodsFor:'documentation'!
  3475 !ChangeSetBrowser2 class methodsFor:'documentation'!
  3476 
  3476 
  3477 version
  3477 version
  3478     ^ '$Id: Tools__ChangeSetBrowser2.st 7999 2012-05-17 23:13:53Z vranyj1 $'
  3478     ^ '$Id: Tools__ChangeSetBrowser2.st 8001 2012-05-18 08:17:46Z vranyj1 $'
  3479 !
  3479 !
  3480 
  3480 
  3481 version_CVS
  3481 version_CVS
  3482     ^ '§Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.32 2012/03/20 18:18:17 cg Exp §'
  3482     ^ '§Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.32 2012/03/20 18:18:17 cg Exp §'
  3483 !
  3483 !
  3484 
  3484 
  3485 version_SVN
  3485 version_SVN
  3486     ^ '$Id: Tools__ChangeSetBrowser2.st 7999 2012-05-17 23:13:53Z vranyj1 $'
  3486     ^ '$Id: Tools__ChangeSetBrowser2.st 8001 2012-05-18 08:17:46Z vranyj1 $'
  3487 ! !
  3487 ! !