Mercurial > urweb
view tests/namejs.ur @ 1999:a1d3fbdcc897
Add <pre> tag support
author | Sergey Mironov <grrwlf@gmail.com> |
---|---|
date | Mon, 24 Feb 2014 09:10:31 +0000 |
parents | 38297294cf98 |
children |
line wrap: on
line source
fun main (n : int) (s : string) : transaction page = return <xml><body> <button onclick={fn _ => alert ("n = " ^ show n ^ "; s = " ^ s)}/> </body></xml>