summaryrefslogtreecommitdiff
path: root/lib/Multi/Feed.pm
diff options
context:
space:
mode:
authorDaniel Cordero <theappleman@gmail.com>2011-10-04 17:17:23 +0800
committerYorhel <git@yorhel.nl>2011-10-04 13:13:28 +0200
commit3b903c10625206e54af6864a8bb8f8f1f165e3ee (patch)
treea77c9737756c6a68b8df61c98f0c26d9fe42f815 /lib/Multi/Feed.pm
parentbb46b4d22011d581682aaf347a648ed89c70ed84 (diff)
Multi::Feed: Add URL to alternative links
Not having the full URI in these links is not a specification fail, but it helps some feed-readers that do not know where they should point.
Diffstat (limited to 'lib/Multi/Feed.pm')
-rw-r--r--lib/Multi/Feed.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Multi/Feed.pm b/lib/Multi/Feed.pm
index 1a955e05..78fdc214 100644
--- a/lib/Multi/Feed.pm
+++ b/lib/Multi/Feed.pm
@@ -112,7 +112,7 @@ sub write_atom { # num, res, feed, time
$x->tag(updated => datetime($updated));
$x->tag(id => $VNDB::S{url}.$VNDB::S{atom_feeds}{$feed}[2]);
$x->tag(link => rel => 'self', type => 'application/atom+xml', href => "$VNDB::S{url}/feeds/$feed.atom", undef);
- $x->tag(link => rel => 'alternate', type => 'text/html', href => $VNDB::S{atom_feeds}{$feed}[2], undef);
+ $x->tag(link => rel => 'alternate', type => 'text/html', href => $VNDB::S{url}.$VNDB::S{atom_feeds}{$feed}[2], undef);
for(@$r) {
$x->tag('entry');
@@ -126,7 +126,7 @@ sub write_atom { # num, res, feed, time
$x->tag(uri => '/u'.$_->{uid}) if $_->{uid};
$x->end;
}
- $x->tag(link => rel => 'alternate', type => 'text/html', href => $_->{id}, undef);
+ $x->tag(link => rel => 'alternate', type => 'text/html', href => $VNDB::S{url}.$_->{id}, undef);
$x->tag('summary', type => 'html', bb2html $_->{summary}) if $_->{summary};
$x->end('entry');
}