gesture-logger

Vocabulary

gesture-logger

Definition

USING: ui.gadgets ;

IN: gesture-logger

TUPLE: gesture-logger < gadget stream ;

Methods

USING: accessors gesture-logger io kernel prettyprint ui.gadgets
ui.gestures ;

M: gesture-logger handle-gesture
    over T{ button-down } = [ dup request-focus ] when stream>>
    [ . ] with-output-stream* t ;


USING: accessors gesture-logger io ui.gadgets ;

M: gesture-logger user-input*
    stream>> [ "User input: " write print ] with-output-stream*
    t ;