equal
deleted
inserted
replaced
215 [container notNil |
215 [container notNil |
216 and:[ (someComponents conform:[:eachComponent | eachComponent isComponentOf:container]) not]] |
216 and:[ (someComponents conform:[:eachComponent | eachComponent isComponentOf:container]) not]] |
217 whileTrue:[ |
217 whileTrue:[ |
218 container := container container. |
218 container := container container. |
219 ]. |
219 ]. |
220 self halt. |
|
221 ^ container |
220 ^ container |
222 ! |
221 ! |
223 |
222 |
224 copySelection |
223 copySelection |
225 "copy the selection into the cut&paste-buffer |
224 "copy the selection into the cut&paste-buffer |