summaryrefslogtreecommitdiff
path: root/tests/vlad4.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2011-01-16 10:57:59 -0500
committerGravatar Adam Chlipala <adam@chlipala.net>2011-01-16 10:57:59 -0500
commit205079fca12e2033d2ad176dc55afb4f7295bf20 (patch)
tree21d1cd652ab88106955b52bb46933daa4ec07a9f /tests/vlad4.ur
parent7c9b1361afcebf3d3382873dbdb5c7f2e5e7e087 (diff)
Fix for handling of some attributes to client-side input widgets, based on a patch from Vladimir Shabanov
Diffstat (limited to 'tests/vlad4.ur')
-rw-r--r--tests/vlad4.ur6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/vlad4.ur b/tests/vlad4.ur
new file mode 100644
index 00000000..d2bd14ef
--- /dev/null
+++ b/tests/vlad4.ur
@@ -0,0 +1,6 @@
+fun main () : transaction page =
+ s <- source "";
+ return <xml><body>
+ <ctextbox source={s} value="123" onchange={s <- get s; alert (s ^ "!")}/>
+ <dyn signal={s <- signal s; return (txt s)}/>
+ </body></xml>