From 9028536a2743ac820e4c3a7c04d0a4f1d336eeb8 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adam@chlipala.net>
Date: Tue, 25 Jan 2011 06:59:29 -0500
Subject: Allow 'alt' attribute of <img> (suggested by Karn Kallio)

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

(limited to 'lib/ur/basis.urs')

diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index fe3f0635..da703d40 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -704,7 +704,7 @@ val hr : bodyTag boxAttrs
 
 val a : bodyTag ([Link = transaction page, Href = url] ++ boxAttrs)
 
-val img : bodyTag ([Src = url, Width = int, Height = int,
+val img : bodyTag ([Alt = string, Src = url, Width = int, Height = int,
                     Onabort = transaction unit, Onerror = transaction unit,
                     Onload = transaction unit] ++ boxAttrs)
           
-- 
cgit v1.2.3