comparison demo/more/conferenceFields.ur @ 1029:53a22f46f377

Seeing others' reviews
author Adam Chlipala <adamc@hcoop.net>
date Mon, 02 Nov 2009 14:22:29 -0500
parents 16f7cb0891b6
children 5d9f47124c4c
comparison
equal deleted inserted replaced
1028:8b7971e74335 1029:53a22f46f377
1 open Meta 1 open Meta
2 2
3 val title = string "Title" 3 val title = string "Title"
4 val abstract = textarea "Abstract" 4 val abstract = textarea "Abstract"
5 val commentsForAuthors = textarea "Comments for Authors"
5 6
6 fun charIn s = 7 fun charIn s =
7 if String.length s = 0 then 8 if String.length s = 0 then
8 error <xml>Impossible: Empty option value</xml> 9 error <xml>Impossible: Empty option value</xml>
9 else 10 else