Handbook
Glossary
<clear-button> ( search-field -- button )
Vocabulary
ui.gadgets.search-tables
Inputs
search-field
an
object
Outputs
button
an
object
Definition
USING:
accessors
kernel
ui.gadgets.buttons
ui.pens
;
IN:
ui.gadgets.search-tables
:
<clear-button>
( search-field -- button )
[
f
]
dip
[
[
drop
]
]
dip
[
clear-search-field
]
curry
compose
<button>
<clear-button-pen>
>>interior
dup
dup
interior>>
pen-pref-dim
>>min-dim
;