diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-07-13 15:44:00 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-07-13 15:44:00 -0400 |
| commit | c54e3eca0a8d7e72f12801bc5ec993dddfa7958b (patch) | |
| tree | a37326be0f01025df57b4f3bf1f209528042df1c /src/tag.sml | |
| parent | 0eb51a6e21e5f435d37afd885ae316a0575c7208 (diff) | |
Serving pages
Diffstat (limited to 'src/tag.sml')
| -rw-r--r-- | src/tag.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tag.sml b/src/tag.sml index ebccc26d..9004a55b 100644 --- a/src/tag.sml +++ b/src/tag.sml @@ -100,7 +100,7 @@ fun exp env (e, s) = 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))) |