diff demo/chat.ur @ 1784:e6bc6bbd7a32

Update demo code for key/mouse handler change
author Adam Chlipala <adam@chlipala.net>
date Sat, 21 Jul 2012 10:12:35 -0400
parents ed06e25c70ef
children
line wrap: on
line diff
--- a/demo/chat.ur	Sat Jul 21 10:02:53 2012 -0400
+++ b/demo/chat.ur	Sat Jul 21 10:12:35 2012 -0400
@@ -40,7 +40,7 @@
         return <xml><body onload={onload ()}>
           <h1>{[r.T.Title]}</h1>
 
-          <button value="Send:" onclick={doSpeak ()}/> <ctextbox source={newLine}/>
+          <button value="Send:" onclick={fn _ => doSpeak ()}/> <ctextbox source={newLine}/>
 
           <h2>Messages</h2>