equal
deleted
inserted
replaced
3611 firstChange := true. |
3611 firstChange := true. |
3612 |
3612 |
3613 shiftedColor := [:clr :hShift :lFactor :sFactor | |
3613 shiftedColor := [:clr :hShift :lFactor :sFactor | |
3614 Color |
3614 Color |
3615 hue:((clr hue) ? 0 + hShift) |
3615 hue:((clr hue) ? 0 + hShift) |
3616 light:((clr light * lFactor / 100) min:100) |
3616 light:((clr light * lFactor / 100) "min:100") |
3617 saturation:((clr saturation * sFactor / 100) min:100)]. |
3617 saturation:((clr saturation * sFactor / 100) "min:100")]. |
3618 |
3618 |
3619 shiftAction := |
3619 shiftAction := |
3620 [ |
3620 [ |
3621 |hShift lFactor sFactor| |
3621 |hShift lFactor sFactor| |
3622 |
3622 |