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

darcs-ui-demo uses bevel buttons

db4
Sam Anklesaria 2009-05-25 15:31:43 -05:00
parent 27623f3a48
commit 07ec9de32b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/darcs-ui-demo/darcs-ui-demo.factor
View File

@ -17,7 +17,7 @@ IN: darcs-ui-demo
: patches-quot ( -- model-of-quot )
[ whatsnew [ length <model> ] keep <model>
[ <change-list> ->% 1 "okay" <frp-button> [ close-window ] >>hook
[ <change-list> ->% 1 "okay" <frp-bevel-button> [ close-window ] >>hook
-> <updates> [ [ answer ] 2curry ] 2fmap-&
] <vbox> { 229 200 } >>pref-dim "select changes" open-window
] [ drop [ ] "No changes!" alert f <model> ] recover ;