ui.gadgets.sliders: restoring the arrows (temporarily?).

locals-and-roots
John Benediktsson 2016-04-23 10:04:46 -07:00
parent b31415f8a3
commit 6a5f3f192e
1 changed files with 4 additions and 0 deletions

View File

@ -235,7 +235,11 @@ PRIVATE>
swap >>model
16 >>line
dup orientation>> {
[ <slider-pen> >>interior ]
[ <thumb> >>thumb ]
[ <elevator> >>elevator ]
[ drop dup add-thumb-to-elevator 1 track-add ]
[ <up-button> f track-add ]
[ <down-button> f track-add ]
[ drop <gadget> { 1 1 } >>dim f track-add ]
} cleave ;