--- Begin Message ---
Subject: |
[PATCH] guix: Shorten URL for home page in texlive importer. |
Date: |
Sat, 18 Mar 2023 14:13:19 +0100 |
* guix/import/texlive.scm (tlpdb->package): Use short URL for home page.
---
guix/import/texlive.scm | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/guix/import/texlive.scm b/guix/import/texlive.scm
index 82014ee568..e77b2a3f9a 100644
--- a/guix/import/texlive.scm
+++ b/guix/import/texlive.scm
@@ -286,9 +286,10 @@ (define (tlpdb->package name version package-database)
(string->symbol name)))
inputs))))))
'())
- ,@(or (and=> (assoc-ref data 'catalogue-ctan)
- (lambda (url)
- `((home-page ,(string-append "https://ctan.org" url)))))
+ ,@(or (and=> (assoc-ref data 'name)
+ (lambda (name)
+ `((home-page ,(string-append "https://www.ctan.org/pkg/"
+ name)))))
'((home-page "https://www.tug.org/texlive/")))
(synopsis ,(assoc-ref data 'shortdesc))
(description ,(beautify-description
base-commit: 3893758dac76fc30b23d4715e849e262306f268d
--
2.39.2
--- End Message ---
--- Begin Message ---
Subject: |
Re: [bug#62254] [PATCH] guix: Shorten URL for home page in texlive importer. |
Date: |
Thu, 30 Mar 2023 18:22:56 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.2 (gnu/linux) |
Hello,
Ludovic Courtès <ludo@gnu.org> writes:
>> + ,@(or (and=> (assoc-ref data 'name)
>> + (lambda (name)
>> + `((home-page ,(string-append
>> "https://www.ctan.org/pkg/"
>> + name)))))
>
> Are there cases where ‘data’ might be missing ‘name’?
I don't think so. And even if assoc-ref returns #false, the template
would get the default home page.
> If not, please push!
Done. Thanks for the feedback
Regards,
--
Nicolas Goaziou
--- End Message ---