Beat me to it, with a virtually identical change. :-)
alex
On Sat Aug 17 21:56:44 2013 Cyril Roelandt <tipec...@gmail.com> wrote:
> * build-aux/list-packages.scm (package->sxml): add an alternative text
> for the logos of the packages.
> ---
> build-aux/list-packages.scm | 3 ++-
> 1 file changed, 2 insertions(+), 1 deletion(-)
>
> diff --git a/build-aux/list-packages.scm b/build-aux/list-packages.scm
> index a1bea69..3f17b87 100755
> --- a/build-aux/list-packages.scm
> +++ b/build-aux/list-packages.scm
> @@ -115,7 +115,8 @@ exec guile -l "$0"
> \
> ((? string? url)
> `(img (@ (src ,url)
> (height "35em")
> - (class
> "package-logo"))))
> + (class
> "package-logo")
> + (alt ("Logo of "
> ,(package-name
> package)))))) (_ #f))
> (p ,(package-description package))
> ,(license package)
> --
> 1.8.3.1
>
>
