ImageEditor.st
changeset 1952 73a141744891
parent 1951 9ad40a628278
child 1960 62c7258f3c31
equal deleted inserted replaced
1951:9ad40a628278 1952:73a141744891
  3174 ! !
  3174 ! !
  3175 
  3175 
  3176 !ImageEditor methodsFor:'data access'!
  3176 !ImageEditor methodsFor:'data access'!
  3177 
  3177 
  3178 atColor:anOldColor put:newColor
  3178 atColor:anOldColor put:newColor
  3179     "a color changed to a new color
  3179     "a color changed to a new color"
  3180     "
  3180 
  3181     |index list oldColor image newImage oldSel|
  3181     |index list oldColor image newImage oldSel|
  3182 
  3182 
  3183     list  := self listOfColors.
  3183     list  := self listOfColors.
  3184     index := list identityIndexOf:anOldColor.
  3184     index := list identityIndexOf:anOldColor.
  3185 
  3185