9 lines
193 B
Factor
9 lines
193 B
Factor
|
IN: temporary
|
||
|
|
USING: gadgets-scrolling gadgets test generic ;
|
||
|
|
|
||
|
|
[ t ]
|
||
|
|
[ <y-slider> slider-elevator [ timer-gadget? ] is? ]
|
||
|
|
unit-test
|
||
|
|
|
||
|
|
[ ] [ <y-slider> slider-elevator elevator-click ] unit-test
|