summary refs log tree commit diff
path: root/build-aux/list-packages.scm
diff options
context:
space:
mode:
authorCyril Roelandt <tipecaml@gmail.com>2013-08-18 01:35:00 +0200
committerCyril Roelandt <tipecaml@gmail.com>2013-08-19 01:29:56 +0200
commitba95e7028feaa3bf3b39da92dacf015a3d6690d0 (patch)
treecaf19d69b1e67d27c1d7dc823c0333e5e4aa11b5 /build-aux/list-packages.scm
parentf99f6fd6fa5c55f490fad7f4e444ef8a835db2ac (diff)
downloadguix-ba95e7028feaa3bf3b39da92dacf015a3d6690d0.tar.gz
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)
Diffstat (limited to 'build-aux/list-packages.scm')
-rwxr-xr-xbuild-aux/list-packages.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/build-aux/list-packages.scm b/build-aux/list-packages.scm
index 5fbe3590ac..9cb07c19f7 100755
--- 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")