cap: explicitly set the image's component-type
parent
6e8e296b99
commit
f60bcc7dc1
|
@ -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