branch master updated: Fix a couple of things on the package substitute availability page

[Christopher Baines]

This is an automated email from the git hooks/post-receive script.

cbaines pushed a commit to branch master
in repository data-service.

The following commit(s) were added to refs/heads/master by this push:
     new 27c34a9  Fix a couple of things on the package substitute availability 
page
27c34a9 is described below

commit 27c34a9ca5ea010f207a4acad597ce98e84d3567
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Mar 12 10:49:19 2022 +0000

    Fix a couple of things on the package substitute availability page
    
    When there's a target, render the heading neatly, and include the target
    parameter in the URLs.
---
 guix-data-service/web/revision/html.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/guix-data-service/web/revision/html.scm 
b/guix-data-service/web/revision/html.scm
index 45d58ec..6b69e4a 100644
--- a/guix-data-service/web/revision/html.scm
+++ b/guix-data-service/web/revision/html.scm
@@ -1103,7 +1103,10 @@ figure {
     `(div
       (@ (class "col-sm-6"))
       (h3 (@ (style "font-family: monospace;"))
-          ,system ,target)
+          ,system
+          ,@(if (string-null? target)
+                '()
+                `((*ENTITY* nbsp) (*ENTITY* rarr) (*ENTITY* nbsp) ,target)))
       (figure
        (div
         (@ (class "figure-content"))
@@ -1229,7 +1232,10 @@ figure {
                                  "substitutes_available_from="
                                  "substitutes_not_available_from=")
                              (number->string build-server-id)
-                             "&system=" system)))
+                             "&system=" system
+                             (if (string-null? target)
+                                   ""
+                                   (string-append "&target=" target)))))
                        ,(format #f "~a (~d, ~2,2f%)"
                                 label
                                 (or count 0)