Mercurial > urweb

diff src/tag.sml @ 117:94856a3b4752

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Serving pages
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Jul 2008 15:44:00 -0400
parents 690d72c92a15
children 7fdc146b2bc2
line wrap: on
line diff
--- a/src/tag.sml	Sun Jul 13 13:38:23 2008 -0400
+++ b/src/tag.sml	Sun Jul 13 15:44:00 2008 -0400
@@ -100,7 +100,7 @@
                                                    val e = (EClosure (cn, args), loc)
                                                    val t = (CFfi ("Basis", "string"), loc)
                                                in
-                                                   ((x, e, t),
+                                                   (((CName "href", loc), e, t),
                                                     (count, tags, byTag, newTags))
                                                end
                                              | _ => ((x, e, t), (count, tags, byTag, newTags)))