Skip to content
Snippets Groups Projects
Commit ba95e702 authored by Cyril Roelandt's avatar Cyril Roelandt
Browse files

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)
parent f99f6fd6
No related branches found
No related tags found
No related merge requests found
...@@ -113,7 +113,7 @@ (define (package-logo name) ...@@ -113,7 +113,7 @@ (define (package-logo name)
,(match (package-logo (package-name package)) ,(match (package-logo (package-name package))
((? string? url) ((? string? url)
`(img (@ (src ,url) `(img (@ (src ,url)
(height "35em") (height "35")
(class "package-logo") (class "package-logo")
(alt ("Logo of " ,(package-name package)))))) (alt ("Logo of " ,(package-name package))))))
(_ #f)) (_ #f))
...@@ -132,7 +132,7 @@ (define (packages->sxml packages) ...@@ -132,7 +132,7 @@ (define (packages->sxml packages)
(div (div
(img (@ (src "graphics/guix-logo.small.png") (img (@ (src "graphics/guix-logo.small.png")
(alt "GNU Guix and the GNU System") (alt "GNU Guix and the GNU System")
(height "83em")))) (height "83"))))
(p "This web page lists the packages currently provided by the " (p "This web page lists the packages currently provided by the "
(a (@ (href "manual/guix.html#GNU-Distribution")) (a (@ (href "manual/guix.html#GNU-Distribution"))
"GNU system distribution") "GNU system distribution")
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment