Handbook Glossary
factorcode.org
escape-string-editor


Vocabulary
escape-strings.ui

Definition
USING: ui.gadgets.editors ;

IN: escape-strings.ui

TUPLE: escape-string-editor < source-editor source-model quot ;


Methods
USING: accessors escape-strings.ui generic kernel models
ui.gadgets ;

M: escape-string-editor graft*
[ dup source-model>> add-connection ]
[ M\ escape-string-editor graft* (call-next-method) ] bi ;


USING: accessors combinators documents escape-strings.ui generic
kernel models ui.gadgets.editors ;

M: escape-string-editor model-changed
2dup source-model>> eq? [
[ doc-string ] dip
[ quot>> ( str -- str' ) call-effect ]
[ set-editor-string ] bi
]
[ M\ escape-string-editor model-changed (call-next-method) ]
if ;


USING: accessors escape-strings.ui generic kernel models
ui.gadgets ;

M: escape-string-editor ungraft*
[ dup source-model>> remove-connection ]
[ M\ escape-string-editor ungraft* (call-next-method) ] bi ;