Mercurial > urweb
annotate tests/docevents.ur @ 2136:75c8f8e3f5d0
Ignore manual.out
| author | Adam Chlipala <adam@chlipala.net> |
|---|---|
| date | Fri, 24 Apr 2015 10:01:56 -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> |