image-name

Vocabulary

ui.images

Definition

IN: ui.images

TUPLE: image-name path ;

Methods

USING: ui.gadgets.icons ui.gadgets.labels ui.images ;

M: image-name >label <icon> ;


USING: accessors formatting kernel math namespaces opengl
sequences splitting ui.images ui.images.private ;

M: image-name cached-image
    path>> gl-scale-factor get-global [
        dup 2.0 <
        [ drop ]
        [ [ "." split1-last ] [ "@%dx." sprintf glue ] bi* ] if
    ] when* (cached-image) ;


USING: kernel sequences ui.gadgets.tables.private ui.images ;

M: image-name cell-dim nip image-dim first2 image-padding ;


USING: kernel ui.gadgets.tables.private ui.images ;

M: image-name draw-cell nip draw-image ;