summaryrefslogtreecommitdiff
path: root/tests/ctextbox.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-01-27 09:53:51 -0500
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-01-27 09:53:51 -0500
commitf9fc82e21b19e56f2f43f0e26d421c6364a1bf51 (patch)
tree7baa355a0b01c717860e5324b8376d52a3a26180 /tests/ctextbox.ur
parentdae861a6fb8608680ae324ce33f32b4516cd94cb (diff)
Use normal fields of ctextboxes
Diffstat (limited to 'tests/ctextbox.ur')
-rw-r--r--tests/ctextbox.ur7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/ctextbox.ur b/tests/ctextbox.ur
new file mode 100644
index 00000000..c2a322e3
--- /dev/null
+++ b/tests/ctextbox.ur
@@ -0,0 +1,7 @@
+fun main () : transaction page =
+ s <- source "Initial";
+ return <xml><body>
+ <ctextbox source={s} size=5/>
+
+ <dyn signal={s <- signal s; return (cdata s)}/>
+ </body></xml>