do not show section if empty

diff --git a/downloads.lisp b/downloads.lisp
index e7b58975f5ab22558c641dc4de2c43e93479174a..33d86150ab4fecccf63034f7c4d2351dd48f4f06 100644 (file)
--- a/downloads.lisp
+++ b/downloads.lisp
@@ -176,9 +176,10 @@
                      base)))
       (display-page pkg-name pkg-base dl-base dl-url giturl gitweb
                     `(("Manual" ,doc-path)
                      base)))
       (display-page pkg-name pkg-base dl-base dl-url giturl gitweb
                     `(("Manual" ,doc-path)

-                      ("Source Code"
-                       (("Unix (.tar.gz)" ,tgz-path)
-                        ("Windows (.zip)" ,zip-path)))
+                      ,@(when (or (directory tgz-path) (directory zip-path))
+                              `(("Source Code"
+                                 (("Unix (.tar.gz)" ,tgz-path)
+                                  ("Windows (.zip)" ,zip-path)))))

                       ("Binaries"
                        (("Linux Binaries" ,linux-path)
                         ("Linux .deb Packages" ,deb-path)
                       ("Binaries"
                        (("Linux Binaries" ,linux-path)
                         ("Linux .deb Packages" ,deb-path)