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)