diff src/tag.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 e0dd85ea58e1
children a5eb8f87bc17
line wrap: on
line diff
--- a/src/tag.sml	Tue Aug 11 11:26:37 2009 -0400
+++ b/src/tag.sml	Tue Aug 11 12:01:54 2009 -0400
@@ -117,7 +117,7 @@
                                                    end
                                            in
                                                case x of
-                                                   (CName "Link", _) => tagIt (Link, "Href")
+                                                   (CName "Link", _) => tagIt (Link, "Link")
                                                  | (CName "Action", _) => tagIt (Action ReadWrite, "Action")
                                                  | _ => ((x, e, t), (count, tags, byTag, newTags))
                                            end)