Mercurial > urweb
annotate tests/docevents.ur @ 2229:54884b28b6c6
Merge.
| author | Ziv Scully <ziv@mit.edu> |
|---|---|
| date | Tue, 07 Apr 2015 17:26:53 -0400 |
| parents | e8863d9f8c59 |
| children |
| rev | line source |
|---|---|
| adam@1555 | 1 fun main () : transaction page = return <xml> |
| ziv@2130 | 2 <body onload={onDblclick (fn _ => alert "Double click"); |
| ziv@2130 | 3 onContextmenu (fn _ => alert "Context menu"); |
| ziv@2130 | 4 onKeypress (fn k => alert ("Keypress: " ^ show k.KeyCode))}> |
| adam@1555 | 5 Nothing here. |
| ziv@2130 | 6 </body> |
| adam@1555 | 7 </xml> |