Mercurial > urweb
annotate tests/docevents.ur @ 2179:4f4ae5c92434
New release
| author | Adam Chlipala <adam@chlipala.net> |
|---|---|
| date | Sun, 18 Oct 2015 10:34:24 -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> |