diff demo/more/conference1.ur @ 1029:53a22f46f377

Seeing others' reviews
author Adam Chlipala <adamc@hcoop.net>
date Mon, 02 Nov 2009 14:22:29 -0500
parents e46227efcbba
children 6bcc1020d5cd
line wrap: on
line diff
--- a/demo/more/conference1.ur	Mon Nov 02 14:14:32 2009 -0500
+++ b/demo/more/conference1.ur	Mon Nov 02 14:22:29 2009 -0500
@@ -3,7 +3,8 @@
 open Conference.Make(struct
                          val paper = {Title = title,
                                       Abstract = abstract}
-                         val review = {Rating = dropdown "Rating" (#"A" :: #"B" :: #"C" :: #"D" :: [])}
+                         val review = {Rating = dropdown "Rating" (#"A" :: #"B" :: #"C" :: #"D" :: []),
+                                       CommentsForAuthors = commentsForAuthors}
 
                          val submissionDeadline = readError "2009-11-22 23:59:59"