equal
deleted
inserted
replaced
6533 image := aBlock value. |
6533 image := aBlock value. |
6534 image notNil ifTrue:[ |
6534 image notNil ifTrue:[ |
6535 image depth > 8 ifTrue:[ |
6535 image depth > 8 ifTrue:[ |
6536 false ifTrue:[ |
6536 false ifTrue:[ |
6537 Error handle:[:ex | |sig| |
6537 Error handle:[:ex | |sig| |
6538 (sig := ex signal) == HaltInterrupt ifTrue:[ex reject]. |
6538 (sig := ex creator) == HaltInterrupt ifTrue:[ex reject]. |
6539 sig == Signal noHandlerSignal ifTrue:[ex reject]. |
6539 sig == Signal noHandlerSignal ifTrue:[ex reject]. |
6540 |
6540 |
6541 self warn:'Could not convert to depth8 image (too many colors)'. |
6541 self warn:'Could not convert to depth8 image (too many colors)'. |
6542 d8image := nil. |
6542 d8image := nil. |
6543 ] do:[ |
6543 ] do:[ |