diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-04-16 12:43:55 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-16 12:43:55 -0400 |
commit | 966f716a755bd954d817b43d1efaaeb6f939ad89 (patch) | |
tree | 3bdf9ae5748bc5a64a10a60633119f8270744818 /tests | |
parent | 51e34115de1d243904e9b49c3839fde9c91c96c9 (diff) |
Show XML
Diffstat (limited to 'tests')
-rw-r--r-- | tests/jserror.ur | 2 |
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> |