equal
deleted
inserted
replaced
915 |
915 |
916 (fit and:[present ~~ 0]) ifTrue:[ |
916 (fit and:[present ~~ 0]) ifTrue:[ |
917 color := Color redByte:r |
917 color := Color redByte:r |
918 greenByte:g |
918 greenByte:g |
919 blueByte:b. |
919 blueByte:b. |
920 color := color on:aDevice. |
920 color := color onDevice:aDevice. |
921 (id := color colorId) isNil ifTrue:[ |
921 (id := color colorId) isNil ifTrue:[ |
922 fit := false |
922 fit := false |
923 ] ifFalse:[ |
923 ] ifFalse:[ |
924 colors at:colorIndex put:color. |
924 colors at:colorIndex put:color. |
925 colorIndex := colorIndex + 1. |
925 colorIndex := colorIndex + 1. |
2418 ! ! |
2418 ! ! |
2419 |
2419 |
2420 !Depth24Image class methodsFor:'documentation'! |
2420 !Depth24Image class methodsFor:'documentation'! |
2421 |
2421 |
2422 version |
2422 version |
2423 ^ '$Header: /cvs/stx/stx/libview/Depth24Image.st,v 1.70 1999-06-24 08:37:43 cg Exp $' |
2423 ^ '$Header: /cvs/stx/stx/libview/Depth24Image.st,v 1.71 1999-08-18 15:09:03 cg Exp $' |
2424 ! ! |
2424 ! ! |