Mercurial > gui

view examples/datebox.ur @ 13:c016beb0ebac

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Repair calendarCtl : adjust monthinfo when set.
author Karn Kallio <kkallio@eka>
date Thu, 28 Jul 2011 11:51:10 -0430
parents bbdedfde154e
children 0827320b0f04
line wrap: on
line source
fun main () =

tm <- now;

dayCtl <- Datebox.createCalendarCtl tm;

return
    <xml>
      <head><title>Datebox Example</title></head>
      <body>
        {Datebox.renderCalendarCtl (fn (d : Datebox.date) => alert (show d.Year)) dayCtl}
      </body>
    </xml>