From 151d389c332e3465d472a210b8d64eeb3883ca12 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 19 Mar 2012 10:47:27 -0600 Subject: [PATCH] Add mac --- downloads.lisp | 22 ++++++++++++++++------ 1 file changed, 16 insertions(+), 6 deletions(-) diff --git a/downloads.lisp b/downloads.lisp index bac84bb..33d8615 100644 --- a/downloads.lisp +++ b/downloads.lisp @@ -165,14 +165,24 @@ (w32-path (merge-pathnames (make-pathname :directory '(:relative "win32") :type :wild :name :wild) + base)) + (mac-path (merge-pathnames + (make-pathname :directory '(:relative "mac") + :type :wild :name :wild) + base)) + (linux-path (merge-pathnames + (make-pathname :directory '(:relative "linux") + :type :wild :name :wild) 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" - (("Debian Linux" ,deb-path) - ("RedHat Linux" ,rpm-path))) + (("Linux Binaries" ,linux-path) + ("Linux .deb Packages" ,deb-path) + ("Linux .rpm Packages" ,rpm-path) + ("Mac Binaries" ,mac-path) ("Windows Binaries" ,w32-path)))))))) -- 2.34.1