cap: explicitly set the image's component-type
parent
a59c01ead9
commit
0b5192d398
|
|
@ -23,6 +23,7 @@ IN: cap
|
||||||
: screenshot ( window -- bitmap )
|
: screenshot ( window -- bitmap )
|
||||||
[ <image> ] dip
|
[ <image> ] dip
|
||||||
[ gl-screenshot >>bitmap ] [ dim>> >>dim ] bi
|
[ gl-screenshot >>bitmap ] [ dim>> >>dim ] bi
|
||||||
|
ubyte-components >>component-type
|
||||||
RGBA >>component-order
|
RGBA >>component-order
|
||||||
t >>upside-down?
|
t >>upside-down?
|
||||||
normalize-image ;
|
normalize-image ;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue