summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsirgazil <sirgazil@zoho.com>2019-02-25 14:13:28 -0500
committersirgazil <sirgazil@zoho.com>2019-02-25 14:13:28 -0500
commitd46ce7d92461078c3244b862946c945e42847076 (patch)
tree7c9ab0edd7fce59743fe8feabd83d0c7f8335e78
parentwebsite: Add Guix Days post about bootstrapping ARM. (diff)
downloadguix-artwork-d46ce7d92461078c3244b862946c945e42847076.tar.gz
website: packages: Remove duplicated code.
* website/apps/packages/templates/components.scm (detailed-package-preview): Use location->shtml instead.
-rw-r--r--website/apps/packages/templates/components.scm5
1 files changed, 1 insertions, 4 deletions
diff --git a/website/apps/packages/templates/components.scm b/website/apps/packages/templates/components.scm
index 701432c..6ab36a5 100644
--- a/website/apps/packages/templates/components.scm
+++ b/website/apps/packages/templates/components.scm
@@ -65,10 +65,7 @@
#:url (package-home-page package)) ".")
(li (b "Package source:") " "
- ,(let* ((l (package-location package))
- (ilink (location->ilink l)))
- (link-subtle #:label (ilink-name ilink)
- #:url (ilink-url ilink)))
+ ,(location->shtml (package-location package))
".")
(li (b "Patches:") " "