<icons-section> ( -- gadget )

Vocabulary

ui-demo

Inputs

None

Outputs

gadget

an object

Definition

USING: definitions.icons sequences ui.gadgets ui.gadgets.icons
ui.images ;

IN: ui-demo

: <icons-section> ( -- gadget )
    <section>
    "An icon draws an image from disk, picking the variant that su..."
    <prose> add-gadget <shelf-of> demo-icons
    [ definition-icon-path <image-name> <icon> add-gadget ] each
    add-gadget
    "These are the icons the browser uses for definitions."
    <note> add-gadget <page> ;