models.product: fix example (reported by Muzzleflash)

release
Slava Pestov 2010-03-30 17:33:08 -04:00
parent 2b68f56c89
commit 60d1a9640d
1 changed files with 1 additions and 1 deletions

View File

@ -13,7 +13,7 @@ $nl
"ui.gadgets.labels ui.gadgets.packs ui.gadgets.panes"
"ui.gadgets.sliders ;"
""
": <funny-model> ( -- model ) 0 10 0 100 <range> ;"
": <funny-model> ( -- model ) 0 10 0 100 1 <range> ;"
": <funny-slider> ( model -- slider ) horizontal <slider> ;"
""
"<funny-model> <funny-model> 2array"