equal
deleted
inserted
replaced
387 ! ! |
387 ! ! |
388 |
388 |
389 !UISpecificationTool methodsFor:'selection'! |
389 !UISpecificationTool methodsFor:'selection'! |
390 |
390 |
391 selection:something |
391 selection:something |
392 "selection changed |
392 "selection changed" |
393 " |
393 |
394 |slices index spec window| |
394 |slices index spec window| |
395 |
395 |
396 specification notNil ifTrue:[ |
396 specification notNil ifTrue:[ |
397 slices := specification class slices. |
397 slices := specification class slices. |
398 index := slices findFirst:[:aSlice| aSlice first = something ]. |
398 index := slices findFirst:[:aSlice| aSlice first = something ]. |