summaryrefslogtreecommitdiff
path: root/tests/docevents.ur
diff options
context:
space:
mode:
authorGravatar Ziv Scully <ziv@mit.edu>2015-04-07 14:18:53 -0400
committerGravatar Ziv Scully <ziv@mit.edu>2015-04-07 14:18:53 -0400
commit04a490556990d2faf21a3c0e38fef9a78d1eacce (patch)
treec19f5f4f9b016c7742ea489e7763f0f075aea171 /tests/docevents.ur
parentcaa87abb5c63bf56493634d278e07add05146ad2 (diff)
New mouse events oncontextmenu, onmouseenter, and onmouseleave.
Diffstat (limited to 'tests/docevents.ur')
-rw-r--r--tests/docevents.ur7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/docevents.ur b/tests/docevents.ur
index eed38868..906afa2b 100644
--- a/tests/docevents.ur
+++ b/tests/docevents.ur
@@ -1,6 +1,7 @@
fun main () : transaction page = return <xml>
- <body onload={onDblclick (alert "Double click");
- onKeypress (fn k => alert ("Keypress: " ^ show k))}>
+ <body onload={onDblclick (fn _ => alert "Double click");
+ onContextmenu (fn _ => alert "Context menu");
+ onKeypress (fn k => alert ("Keypress: " ^ show k.KeyCode))}>
Nothing here.
- </body>
+ </body>
</xml>