swaggboi/PostText
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add atom namespace for validator warnings

Browse Source
This commit is contained in:
swag 2023-05-12 14:42:45 -04:00
parent 0a5e6a980d
commit 1337d35f0c
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lib/PostText/Controller/Thread.pm
View File

@ -95,13 +95,25 @@ sub by_page($self) {
sub feed($self) { sub feed($self) {
my $threads = $self->thread->feed; my $threads = $self->thread->feed;
my $rss = XML::RSS->new(version => '2.0'); my $rss = XML::RSS->new(version => '2.0');
my $chan_link = $self->url_for(threads_list => {list_page => 1})->to_abs; my $chan_link = $self->url_for(threads_list => {list_page => 1} )->to_abs;
my $rss_link = $self->url_for(threads_feed => {format => 'rss'})->to_abs;
$rss->add_module(
prefix => 'atom',
uri => 'http://www.w3.org/2005/Atom'
);
$rss->channel( $rss->channel(
title => 'Post::Text', title => 'Post::Text',
description => 'In UTF-8 we trust. 🫡', description => 'In UTF-8 we trust. 🫡',
link => $chan_link, link => $chan_link,
lastBuildDate => time2str('%a, %d %b %Y %X %z', time) lastBuildDate => time2str('%a, %d %b %Y %X %z', time),
atom => {
link => {
href => $rss_link,
rel => 'self'
}
}
); );
for my $thread (@{$threads}) { for my $thread (@{$threads}) {