equal
deleted
inserted
replaced
4412 " |
4412 " |
4413 |keptSelection| |
4413 |keptSelection| |
4414 |
4414 |
4415 "/ the selection may change at any time (may it?) |
4415 "/ the selection may change at any time (may it?) |
4416 (keptSelection := selection) isNil ifTrue:[^ nil]. |
4416 (keptSelection := selection) isNil ifTrue:[^ nil]. |
4417 ^ keptSelection do:aOneArgBlock |
4417 keptSelection do:aOneArgBlock |
4418 |
4418 |
4419 "Modified (format): / 12-02-2017 / 11:53:23 / cg" |
4419 "Modified (format): / 12-02-2017 / 11:53:23 / cg" |
4420 ! |
4420 ! |
4421 |
4421 |
4422 from:start do:aOneArgBlock |
4422 from:start do:aOneArgBlock |