summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2010-11-14 12:52:14 +0100
committerYorhel <git@yorhel.nl>2010-11-14 12:52:14 +0100
commitbea881bea4a429fb2a63325410a9f5fab7291a2d (patch)
tree4f203c24b0387c72286461aa2ecaa2f3905ee192
parentf5366ab8d9d5465a80d4e9f599cee6c1fe4f5b49 (diff)
Handler::Misc: Added title attribute to the feed cssicons
This also gets rid of three perl warnings.
-rw-r--r--data/lang.txt8
-rw-r--r--lib/VNDB/Handler/Misc.pm8
2 files changed, 11 insertions, 5 deletions
diff --git a/data/lang.txt b/data/lang.txt
index 8ddd96d6..4388dc72 100644
--- a/data/lang.txt
+++ b/data/lang.txt
@@ -1511,6 +1511,14 @@ hu : moderálásra vár
nl : ongemodereerd
+# title of the syndication icon (this thing -> http://en.wikipedia.org/wiki/Atom_feed)
+
+:_atom_feed
+en : Atom Feed
+ru*:
+cs*:
+hu*:
+nl :
#############################################################################
diff --git a/lib/VNDB/Handler/Misc.pm b/lib/VNDB/Handler/Misc.pm
index cbd1dc50..815f308f 100644
--- a/lib/VNDB/Handler/Misc.pm
+++ b/lib/VNDB/Handler/Misc.pm
@@ -64,7 +64,7 @@ sub homepage {
td;
h1;
a href => '/hist', mt '_home_recentchanges'; txt ' ';
- a href => '/feeds/changes.atom'; cssicon 'feed'; end;
+ a href => '/feeds/changes.atom'; cssicon 'feed', mt '_atom_feed'; end;
end;
my $changes = $self->dbRevisionGet(what => 'item user', results => 10, auto => 1);
ul;
@@ -84,8 +84,7 @@ sub homepage {
my $an = $self->dbThreadGet(type => 'an', sort => 'id', reverse => 1, results => 2);
h1;
a href => '/t/an', mt '_home_announcements'; txt ' ';
- a href => '/feeds/announcements.atom'; cssicon 'feed'; end;
-
+ a href => '/feeds/announcements.atom'; cssicon 'feed', mt '_atom_feed'; end;
end;
for (@$an) {
my $post = $self->dbPostGet(tid => $_->{id}, num => 1)->[0];
@@ -102,8 +101,7 @@ sub homepage {
td;
h1;
a href => '/t', mt '_home_recentposts'; txt ' ';
- a href => '/feeds/posts.atom'; cssicon 'feed'; end;
-
+ a href => '/feeds/posts.atom'; cssicon 'feed', mt '_atom_feed'; end;
end;
my $posts = $self->dbThreadGet(what => 'lastpost boardtitles', results => 10, sort => 'lastpost', reverse => 1, notusers => 1);
ul;