diff --git a/extra/cap/cap.factor b/extra/cap/cap.factor index 564d0b9711..a02220ff36 100644 --- a/extra/cap/cap.factor +++ b/extra/cap/cap.factor @@ -24,7 +24,7 @@ IN: cap [ glReadPixels ] keep ; : screenshot ( window -- bitmap ) - [ t >>2x? ] dip + [ ] dip [ gl-screenshot >>bitmap ] [ dim>> [ gl-scale >fixnum ] map >>dim ] bi ubyte-components >>component-type