diff options
-rw-r--r-- | lib/PublicInbox/WwwAtomStream.pm | 3 | ||||
-rw-r--r-- | t/psgi_v2.t | 5 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lib/PublicInbox/WwwAtomStream.pm b/lib/PublicInbox/WwwAtomStream.pm index f60251b7..5d32294e 100644 --- a/lib/PublicInbox/WwwAtomStream.pm +++ b/lib/PublicInbox/WwwAtomStream.pm @@ -161,7 +161,8 @@ sub feed_entry { } sub feed_updated { - '<updated>' . strftime('%Y-%m-%dT%H:%M:%SZ', gmtime(@_)) . '</updated>'; + my ($t) = @_; + '<updated>' . strftime('%Y-%m-%dT%H:%M:%SZ', gmtime($t)) . '</updated>'; } 1; diff --git a/t/psgi_v2.t b/t/psgi_v2.t index e0570682..64c1a8d3 100644 --- a/t/psgi_v2.t +++ b/t/psgi_v2.t @@ -92,6 +92,11 @@ my $client0 = sub { @bodies = ($res->content =~ /^(hello [^<]+)$/mg); is_deeply(\@bodies, [ "hello world!\n", "hello world\n" ], 'new.html ordering is chronological'); + + $res = $cb->(GET('/v2test/new.atom')); + my @dates = ($res->content =~ m!title><updated>([^<]+)</updated>!g); + is_deeply(\@dates, [ "1993-10-02T00:01:00Z", "1993-10-02T00:00:00Z" ], + 'Date headers made it through'); }; test_psgi(sub { $www->call(@_) }, $client0); my $env = { TMPDIR => $tmpdir, PI_CONFIG => $cfgpath }; |