Fix conflict in images vocab

[factor.git] / extra / images / viewer / viewer.factor

diff --git a/extra/images/viewer/viewer.factor b/extra/images/viewer/viewer.factor
index 1d4de79f07648e7539953b35435ce92995b0b564..faed31a0e5db95178796e408ddc066e2617e39be 100644 (file)
--- 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 )
     \ image-gadget new-gadget