summaryrefslogtreecommitdiff
path: root/tests/jserror.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-04-16 12:43:55 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-04-16 12:43:55 -0400
commitd52fbe487bb29a4a60dcca1d36e9dadc64917517 (patch)
tree3bdf9ae5748bc5a64a10a60633119f8270744818 /tests/jserror.ur
parent237c9393b135b40e07f97b00699fd6cf9b48dac4 (diff)
Show XML
Diffstat (limited to 'tests/jserror.ur')
-rw-r--r--tests/jserror.ur2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/jserror.ur b/tests/jserror.ur
index ab2c955c..eccbe344 100644
--- a/tests/jserror.ur
+++ b/tests/jserror.ur
@@ -1,3 +1,3 @@
fun main () : transaction page = return <xml>
- <body onload={onError (fn s => alert "There was an error."); error <xml>Badder</xml>}/>
+ <body onload={onError (fn s => alert ("There was an error: " ^ show s)); error <xml>Badder</xml>}/>
</xml>