]> git.jsancho.org Git - blog.git/blobdiff - haunt.scm
Link to english version
[blog.git] / haunt.scm
index d6e58c38269abd74ec59144ab81adb821ea3e34f..5a0a077ee21f3cdd1ad84bcd44f062b4b28f544d 100644 (file)
--- a/haunt.scm
+++ b/haunt.scm
@@ -62,7 +62,8 @@
                                  (li (@ (id "blog-title-header"))
                                      (a (@ (href "index.html"))
                                         (h1 ,(assoc-ref metadata 'author)))))
-                             (ul (@ (class "navigation-items center")))
+                             (ul (@ (class "navigation-items center"))
+                                 (li (a (@ (href "https://en.jsancho.org/")) "in english")))
                              (ul (@ (class "navigation-items right"))
                                  ,@(map (lambda (page)
                                           `(li (a (@ (href ,(cdr page))) ,(car page))))