steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

nehe: use border around buttons.

factor-shell
John Benediktsson 2018-01-22 08:50:41 -08:00
parent 795150333a
commit e49ec97043
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extra/nehe/nehe.factor
View File

@ -1,5 +1,7 @@
USING: ui.gadgets.buttons ui.gadgets.packs ui.gadgets ui USING: accessors kernel nehe.2 nehe.3 nehe.4 nehe.5 ui
nehe.2 nehe.3 nehe.4 nehe.5 kernel accessors ; ui.gadgets ui.gadgets.borders ui.gadgets.buttons
ui.gadgets.packs ;
IN: nehe IN: nehe
MAIN-WINDOW: nehe-window { { title "Nehe Examples" } } MAIN-WINDOW: nehe-window { { title "Nehe Examples" } }
@ -8,6 +10,6 @@ MAIN-WINDOW: nehe-window { { title "Nehe Examples" } }
"Nehe 3" [ drop run3 ] <border-button> add-gadget "Nehe 3" [ drop run3 ] <border-button> add-gadget
"Nehe 4" [ drop run4 ] <border-button> add-gadget "Nehe 4" [ drop run4 ] <border-button> add-gadget
"Nehe 5" [ drop run5 ] <border-button> add-gadget "Nehe 5" [ drop run5 ] <border-button> add-gadget
>>gadgets ; { 2 2 } <border> >>gadgets ;
MAIN: nehe-window MAIN: nehe-window