diff options
author | 2012-03-16 08:42:51 -0400 | |
---|---|---|
committer | 2012-03-16 08:42:51 -0400 | |
commit | a613f7d9361f504290757c686d87f56dc1e7b088 (patch) | |
tree | 3c3cb780abb8c262dab321cbadb323a0cfb66957 /tests/id.ur | |
parent | e90f7afc607a0af326c87ebb184b7eacfee8b92b (diff) |
Change ID generation scheme to conform to HTML standards (thanks to Edward Yang for the catch)
Diffstat (limited to 'tests/id.ur')
-rw-r--r-- | tests/id.ur | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/id.ur b/tests/id.ur new file mode 100644 index 00000000..2178cf4f --- /dev/null +++ b/tests/id.ur @@ -0,0 +1,11 @@ +fun main () : transaction page = + id1 <- fresh; + id2 <- fresh; + x <- source <xml/>; + return <xml><body> + <span id={id1}>Hi!</span> + <span id={id2}>Ho!</span> + <dyn signal={signal x}/> + <button value="Set" onclick={id <- fresh; set x <xml><span id={id}>He!</span></xml>}/> + <button value="Show" onclick={x <- get x; alert (show x)}/> + </body></xml> |