new-book ( model class -- book )


Vocabulary
ui.gadgets.books

Inputs
modelan object
classan object


Outputs
bookan object


Definition
USING: accessors kernel ;

IN: ui.gadgets.books

: new-book ( model class -- book ) new swap >>model ; inline