diff options
author | Ziv Scully <ziv@mit.edu> | 2015-04-07 14:18:53 -0400 |
---|---|---|
committer | Ziv Scully <ziv@mit.edu> | 2015-04-07 14:18:53 -0400 |
commit | f1327b29e1c499845d13e01b4c1635d616713493 (patch) | |
tree | 30175c2ac71e1a0f768a55234014b026408429d0 /tests/docevents.ur | |
parent | 46f7447e864b89097adedb70827017a5eef234f0 (diff) |
New mouse events oncontextmenu, onmouseenter, and onmouseleave.
Diffstat (limited to 'tests/docevents.ur')
-rw-r--r-- | tests/docevents.ur | 7 |
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> |