From ee2f4ffdf2f283c33fb7bb488fa88a1d9f2cf6be Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Thu, 14 May 2009 11:04:56 -0400
Subject: cselect.onchange

---
 lib/ur/basis.urs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lib/ur')

diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index cc18d7b2..45f36ef8 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -632,7 +632,8 @@ val ctextbox : cformTag [Value = string, Size = int, Source = source string] []
 val button : cformTag [Value = string, Onclick = transaction unit] []
 
 con cselect = [Cselect]
-val cselect : cformTag [Source = source string] cselect
+val cselect : cformTag [Source = source string,
+                        Onchange = transaction unit] cselect
 val coption : unit -> tag [Value = string, Selected = bool] cselect [] [] []
 
 (*** Tables *)
-- 
cgit v1.2.3