diff --git a/extra/images/viewer/viewer.factor b/extra/images/viewer/viewer.factor index 06e4c686f3..0b46cce42d 100644 --- a/extra/images/viewer/viewer.factor +++ b/extra/images/viewer/viewer.factor @@ -16,7 +16,7 @@ M: image-gadget pref-dim* [ bitmap>> ] bi glDrawPixels ; M: image-gadget draw-gadget* ( gadget -- ) - origin get [ image>> draw-image ] with-translation ; + image>> draw-image ; : ( image -- gadget ) \ image-gadget new-gadget