list-packages: properly specify the size of images.

* build-aux/list-packages.scm (package->sxml, packages->sxml): specify the size
  of images in pixels (see
  http://www.w3.org/TR/html5/embedded-content-0.html#attr-dim-height)

diff --git a/build-aux/list-packages.scm b/build-aux/list-packages.scm
index 5fbe359..9cb07c1 100755 (executable)
--- a/build-aux/list-packages.scm
+++ b/build-aux/list-packages.scm
@@ -113,7 +113,7 @@ exec guile -l "$0"                              \
                  ,(match (package-logo (package-name package))
                     ((? string? url)
                      `(img (@ (src ,url)
-                              (height "35em")
+                              (height "35")
                               (class "package-logo")
                               (alt ("Logo of " ,(package-name package))))))
                     (_ #f))
@@ -132,7 +132,7 @@ exec guile -l "$0"                              \
          (div
           (img (@ (src "graphics/guix-logo.small.png")
                   (alt "GNU Guix and the GNU System")
-                  (height "83em"))))
+                  (height "83"))))
          (p "This web page lists the packages currently provided by the "
             (a (@ (href "manual/guix.html#GNU-Distribution"))
                "GNU system distribution")