Mercurial > urweb
diff demo/subforms.ur @ 1833:be0c4e2e488a
Allow any FFI module to declare new HTML tags
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Wed, 28 Nov 2012 16:56:45 -0500 |
parents | 0084af7af35a |
children |
line wrap: on
line diff
--- a/demo/subforms.ur Wed Nov 28 11:45:46 2012 -0500 +++ b/demo/subforms.ur Wed Nov 28 16:56:45 2012 -0500 @@ -13,7 +13,7 @@ </body></xml> end -fun subforms n = +fun subfrms n = if n <= 0 then <xml/> else @@ -22,13 +22,13 @@ <hidden{#Num} value={show n}/> <li>{[n]}: <textbox{#Text}/></li> </entry> - {subforms (n - 1)} + {subfrms (n - 1)} </xml> fun form n = return <xml><body> <form> <subforms{#Lines}> - {subforms n} + {subfrms n} </subforms> <submit action={sub}/> </form>