steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix up images.viewer

db4
Slava Pestov 2009-02-27 01:01:51 -06:00
parent bfc7b3ce8f
commit cdfab25bb1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/images/viewer/viewer.factor
View File

@ -16,7 +16,7 @@ M: image-gadget pref-dim*
[ bitmap>> ] bi glDrawPixels ; [ bitmap>> ] bi glDrawPixels ;
M: image-gadget draw-gadget* ( gadget -- ) M: image-gadget draw-gadget* ( gadget -- )
origin get [ image>> draw-image ] with-translation ; image>> draw-image ;
: <image-gadget> ( image -- gadget ) : <image-gadget> ( image -- gadget )
\ image-gadget new-gadget \ image-gadget new-gadget