Handbook
Glossary
apply-font-style ( style gadget -- style gadget )
Vocabulary
ui
.
gadgets
.
panes
.
private
Inputs
style
an
object
gadget
an
object
Outputs
style
an
object
gadget
an
object
Definition
USING:
accessors
assocs
combinators
io.styles
kernel
;
IN:
ui.gadgets.panes.private
:
apply-font-style
( style gadget -- style gadget )
over
{
[
font-name
of
]
[
font-style
of
]
[
font-size
of
]
[
foreground
of
]
[
background
of
]
}
cleave
specified-font
>>font
;