Handbook
Glossary
begin-drag ( thumb -- )
Vocabulary
ui
.
gadgets
.
sliders
.
private
Inputs
thumb
an
object
Outputs
None
Definition
USING:
accessors
kernel
ui.gadgets.sliders
;
IN:
ui.gadgets.sliders.private
:
begin-drag
( thumb -- )
find-slider
dup
slider-value
>>saved
drop
;