Mercurial > gui

diff calendar.ur @ 27:5905b56e0cd9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Adapt to new HTML contexts
author Adam Chlipala <adam@chlipala.net>
date Tue, 20 Dec 2011 21:04:21 -0500
parents 86857ae0f386
children 93140c5cc972
line wrap: on
line diff
--- a/calendar.ur	Fri Dec 09 17:38:20 2011 -0500
+++ b/calendar.ur	Tue Dec 20 21:04:21 2011 -0500
@@ -207,7 +207,7 @@
     SourceL.onChange ctl.Day f
 
 val gui_t = Gui.mkGui 
-                (fn [body ~ []] ctl =>
+                (fn [[Dyn] ~ body'] ctl =>
                     <xml>
                       <dyn signal={render' ctl}/>
                     </xml>)