summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--haunt.scm17
1 files changed, 8 insertions, 9 deletions
diff --git a/haunt.scm b/haunt.scm
index 547b5c5..4c64a46 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -470,15 +470,14 @@ back button."
`(span (@ (class "horizontally-padded"))
,(if (equal? lingua current-lingua)
lingua
- `(a
- (@
- (href
- ,(string-append
- "/"
- "index-"
- lingua
- ".html")))
- ,lingua))))
+ (a-href
+ ;; TODO LINK TO CORRESPONDING PAGE
+ (string-append
+ "/"
+ "index-"
+ lingua
+ ".html")
+ lingua))))
linguas))))
(div (@ (id "center"))
(nav (@ (id "side-bar"))