civodul pushed a commit to branch master
in repository guix-artwork.
commit 5e849806edb55fe6eb2068814e183ddc8d13a2db
Author: Ludovic Courtès <[email protected]>
Date: Tue Aug 29 00:09:07 2017 +0200
website: packages: Mark GNU packages in the listing.
* website/apps/packages/templates/components.scm
(detailed-package-preview): Mark
if PACKAGE is a GNU package.
* website/apps/packages/templates/package.scm (package-t): Likewise.
---
website/apps/packages/templates/components.scm | 4 ++++
website/apps/packages/templates/package.scm | 6 +++++-
2 files changed, 9 insertions(+), 1 deletion(-)
diff --git a/website/apps/packages/templates/components.scm
b/website/apps/packages/templates/components.scm
index b02bd7e..5224ba2 100644
--- a/website/apps/packages/templates/components.scm
+++ b/website/apps/packages/templates/components.scm
@@ -13,6 +13,7 @@
#:use-module (apps packages utils)
#:use-module (guix licenses)
#:use-module (guix packages)
+ #:use-module (guix gnu-maintenance)
#:export (detailed-package-preview
issue-count->shtml
lint-issue->shtml
@@ -41,6 +42,9 @@
,(package-synopsis-shtml package)))
(p
(@ (class "package-description"))
+ ,(if (gnu-package? package)
+ '(i "This is a GNU package. ")
+ "")
,(package-description-shtml package))
(ul
diff --git a/website/apps/packages/templates/package.scm
b/website/apps/packages/templates/package.scm
index 178a567..20a5937 100644
--- a/website/apps/packages/templates/package.scm
+++ b/website/apps/packages/templates/package.scm
@@ -11,6 +11,7 @@
#:use-module (apps packages templates components)
#:use-module (apps packages types)
#:use-module (apps packages utils)
+ #:use-module (guix gnu-maintenance)
#:export (package-t))
@@ -46,7 +47,10 @@
(@ (class "synopsis"))
,(package-synopsis-shtml package)))
- (p ,(package-description-shtml package))
+ (p ,(if (gnu-package? package)
+ '(it "This is a GNU package. ")
+ "")
+ ,(package-description-shtml package))
(ul
(@ (class "package-info"))
