diff src/monoize.sml @ 907:5fe49effbc83

JavaScript urlifying of bools; correct Link attribute escaping
author Adam Chlipala <adamc@hcoop.net>
date Tue, 11 Aug 2009 12:01:54 -0400
parents 7a4b026e45dd
children ed06e25c70ef
line wrap: on
line diff
--- a/src/monoize.sml	Tue Aug 11 11:26:37 2009 -0400
+++ b/src/monoize.sml	Tue Aug 11 12:01:54 2009 -0400
@@ -2538,6 +2538,7 @@
                                           val x =
                                               case x of
                                                   "Typ" => "Type"
+                                                | "Link" => "Href"
                                                 | _ => x
                                           val xp = " " ^ lowercaseFirst x ^ "=\""