annotate 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
rev   line source
adamc@1007 1 open ConferenceFields
adamc@1007 2
adamc@1003 3 open Conference.Make(struct
adamc@1007 4 val paper = {Title = title,
adamc@1007 5 Abstract = abstract}
adamc@1011 6 val review = {Rating = dropdown "Rating" (#"A" :: #"B" :: #"C" :: #"D" :: [])}
adamc@1006 7
adamc@1006 8 val submissionDeadline = readError "2009-10-22 23:59:59"
adamc@1009 9
adamc@1009 10 fun summarizePaper r = cdata r.Title
adamc@1003 11 end)