From 8ebe391d1eff8d174a1fbbcc5b62e486c1fefa34 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Sat, 9 Aug 2014 15:11:50 -0400
Subject: Fix view-package.

* guix-web/view.scm (view-package): Filter out non-package inputs.
---
 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 adf064b..1d7f116 100644
--- a/guix-web/view.scm
+++ b/guix-web/view.scm
@@ -142,7 +142,8 @@
           '()
           `((dt ,description)
             (dd (ul ,@(map describe-input
-                           (filter package? (second inputs)))))))))
+                           (filter package?
+                                   (map second inputs)))))))))
 
   (define (describe-package package)
     `(dl
-- 
cgit v1.2.3