diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-08-28 14:38:07 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-08-28 14:38:07 +0200 |
| commit | a7494e3f2155a48f40493665752b11b9f0b56fb5 (patch) | |
| tree | 9eda6a91e96fa1951e68ef829c8fa33e939cc023 | |
| parent | website: packages.json: Do not pretty-print. (diff) | |
| download | guix-artwork-a7494e3f2155a48f40493665752b11b9f0b56fb5.tar.gz | |
website: packages.json: Do not emit "homepage" when it's false.
Reported at <https://github.com/repology/repology/issues/218#issuecomment-525675777>.
* website/apps/packages/builder.scm (packages-json-builder): Do not emit
"homepage" when it's false.
| -rw-r--r-- | website/apps/packages/builder.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/website/apps/packages/builder.scm b/website/apps/packages/builder.scm index 70bdcdf..9dc44c9 100644 --- a/website/apps/packages/builder.scm +++ b/website/apps/packages/builder.scm @@ -125,7 +125,9 @@ `(("source" . ,(origin->json (package-source package)))) '()) ("synopsis" . ,(package-synopsis package)) - ("homepage" . ,(package-home-page package)) + ,@(if (package-home-page package) + `(("homepage" . ,(package-home-page package))) + '()) ,@(match (package-location package) ((? location? location) `(("location" |