summaryrefslogtreecommitdiff
path: root/tests/cselect.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 11:04:56 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-05-14 11:04:56 -0400
commitee2f4ffdf2f283c33fb7bb488fa88a1d9f2cf6be (patch)
treeda75a35df02e170e6cc2cfd6f02433f82d8e3763 /tests/cselect.ur
parent471d135b67086298642e9bd26e0e380a605b7068 (diff)
cselect.onchange
Diffstat (limited to 'tests/cselect.ur')
-rw-r--r--tests/cselect.ur2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/cselect.ur b/tests/cselect.ur
index ca05f504..f2a83556 100644
--- a/tests/cselect.ur
+++ b/tests/cselect.ur
@@ -1,7 +1,7 @@
fun main () =
s <- source "";
return <xml><body>
- <cselect source={s}>
+ <cselect source={s} onchange={v <- get s; alert ("Now it's " ^ v)}>
<coption>Wilbur</coption>
<coption>Walbur</coption>
</cselect>