summaryrefslogtreecommitdiff
path: root/build-aux
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
parentf99f6fd6fa5c55f490fad7f4e444ef8a835db2ac (diff)
downloadguix-patches-ba95e7028feaa3bf3b39da92dacf015a3d6690d0.tar
guix-patches-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')
-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")