diff --git a/guix-data-service/web/compare/html.scm b/guix-data-service/web/compare/html.scm index 6c43f8e..8711574 100644 --- a/guix-data-service/web/compare/html.scm +++ b/guix-data-service/web/compare/html.scm @@ -121,7 +121,8 @@ " and " (a (@ (href ,(string-append "/revision/" target-commit))) (samp ,(string-take target-commit 8) "…"))) - ,@(if (apply string=? commit-range-link-url-templates) + ,@(if (and (not (null? commit-range-link-url-templates)) + (apply string=? commit-range-link-url-templates)) `((a (@ (href ,(git-repository-commit-range-link-template->url (first commit-range-link-url-templates) base-commit