summaryrefslogtreecommitdiff
path: root/demo/more/conference1.ur
blob: b686772869967f025fa15ea296bc03f9498476d4 (plain)
1
2
3
4
5
6
7
8
9
10
11
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)