From 6bf6a7be174456290272718040071963c7ed0861 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Wed, 13 Aug 2014 22:58:02 -0400
Subject: Make logo link to package list.

* guix-web/view.scm (main-layout): Wrap image tag in anchor tag.
---
 guix-web/view.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix-web/view.scm b/guix-web/view.scm
index c1c2941..831fc7b 100644
--- a/guix-web/view.scm
+++ b/guix-web/view.scm
@@ -65,7 +65,8 @@
               (href "/css/guix.css"))))
     (body
      (div (@ (class "container"))
-          (image (@ (src "/images/logo.png")))
+          (a (@ (href "/"))
+             (image (@ (src "/images/logo.png"))))
           ,@body
           (footer
            (small
-- 
cgit v1.2.3