Mercurial > urweb
diff lib/ur/basis.urs @ 739:4bb7e1c0550a
Only allow single-file upload per control
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 25 Apr 2009 14:35:49 -0400 |
parents | d049d31a1966 |
children | b302b6e35f93 |
line wrap: on
line diff
--- a/lib/ur/basis.urs Sat Apr 25 14:04:38 2009 -0400 +++ b/lib/ur/basis.urs Sat Apr 25 14:35:49 2009 -0400 @@ -518,11 +518,7 @@ val fileName : file -> option string val fileData : file -> blob -type files -val numFiles : files -> int -val fileNum : files -> int -> file - -val upload : formTag files [] [Value = string, Size = int] +val upload : formTag file [] [Value = string, Size = int] con radio = [Body, Radio] val radio : formTag string radio []