From: Martin Mares <mj@ucw.cz>
Date: Mon, 5 Nov 2018 20:27:37 +0000 (+0100)
Subject: Highslide: Arrows have ALT texts
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=542deda26d55d3a7bee14455dd6b23a0ea85e0f0;p=gallery.git

Highslide: Arrows have ALT texts
---

diff --git a/lib/UCW/Gallery/Web/HighSlide.pm b/lib/UCW/Gallery/Web/HighSlide.pm
index c9d2aa8..09cd910 100644
--- a/lib/UCW/Gallery/Web/HighSlide.pm
+++ b/lib/UCW/Gallery/Web/HighSlide.pm
@@ -34,9 +34,9 @@ sub show_links($$$$) {
 	my ($self, $prev, $up, $next) = @_;
 	my $nav = $self->get('ThemeUrlPrefix') . "highslide/nav";
 	print "<p class=parent>";
-	print "<a href='$prev'><img class=back src='$nav/prev.png'></a>" if $prev ne "";
-	printf "<a href='$next'><img class=fwd src='$nav/next.png'></a>" if $next ne "";
-	printf "<a href='$up'><img class=up src='$nav/back.png'></a>" if $up ne "";
+	print "<a href='$prev'><img class=back src='$nav/prev.png' alt='←'></a>" if $prev ne "";
+	printf "<a href='$next'><img class=fwd src='$nav/next.png' alt='→'></a>" if $next ne "";
+	printf "<a href='$up'><img class=up src='$nav/back.png' alt='↑'></a>" if $up ne "";
 }
 
 sub show_pre_thumbs($) {