Handbook
Glossary
list-presentation-hook ( list -- quot )
Vocabulary
ui
.
gadgets
.
lists
Inputs
list
an
object
Outputs
quot
an
object
Definition
USING:
accessors
sequences
ui.gadgets
;
IN:
ui.gadgets.lists
:
list-presentation-hook
( list -- quot )
hook>>
[
[
list?
]
find-parent
]
prepend
;