From 277913f2ae39e159b1a639fe1d869fd00ce1a2c7 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Tue, 19 Aug 2014 11:17:39 -0400 Subject: and type fixes (grandfathered into release) --- lib/ur/basis.urs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'lib/ur/basis.urs') diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index 9d58ee66..30271ce9 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -1019,9 +1019,8 @@ val button : cformTag ([Value = string] ++ boxAttrs) [] val ccheckbox : cformTag ([Value = bool, Size = int, Source = source bool, Onchange = transaction unit] ++ boxAttrs) [] -con cselect = [Cselect] -val cselect : cformTag ([Source = source string, Onchange = transaction unit] ++ boxAttrs) cselect -val coption : unit -> tag [Value = string, Selected = bool] cselect [] [] [] +val cselect : cformTag ([Source = source string, Onchange = transaction unit] ++ boxAttrs) [Cselect] +val coption : unit -> tag [Value = string, Selected = bool] [Cselect, Body] [] [] [] val ctextarea : cformTag ([Value = string, Rows = int, Cols = int, Source = source string, Onchange = transaction unit, Ontext = transaction unit] ++ boxAttrs) [] -- cgit v1.2.3