view demo/more/conference1.ur @ 1013:d9483301ff0e

Get char working with MySQL
author Adam Chlipala <adamc@hcoop.net>
date Thu, 22 Oct 2009 17:04:37 -0400
parents 16f7cb0891b6
children 9304474170ed
line wrap: on
line source
open ConferenceFields

open Conference.Make(struct
                         val paper = {Title = title,
                                      Abstract = abstract}
                         val review = {Rating = dropdown "Rating" (#"A" :: #"B" :: #"C" :: #"D" :: [])}

                         val submissionDeadline = readError "2009-10-22 23:59:59"

                         fun summarizePaper r = cdata r.Title
                     end)