From 19e80e44033a56422a1de5c7e421a2d4c23ee64c Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Mon, 15 Feb 2021 02:36:38 +0000 Subject: t/psgi_search: fix test around date boundaries git approxidate won't actually return times in the future, so "1.{hour,day,year}.from.now" all return the current epoch time. So just use "now" and ensure we have a predictable time zone for testing. --- t/psgi_search.t | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 't/psgi_search.t') diff --git a/t/psgi_search.t b/t/psgi_search.t index 514df005..9facdf3d 100644 --- a/t/psgi_search.t +++ b/t/psgi_search.t @@ -17,6 +17,7 @@ use_ok($_) for (qw(HTTP::Request::Common Plack::Test)); use_ok 'PublicInbox::WWW'; use_ok 'PublicInbox::SearchIdx'; my ($tmpdir, $for_destroy) = tmpdir(); +local $ENV{TZ} = 'UTC'; my $ibx = PublicInbox::Inbox->new({ inboxdir => $tmpdir, @@ -75,7 +76,7 @@ my $www = PublicInbox::WWW->new($cfg); test_psgi(sub { $www->call(@_) }, sub { my ($cb) = @_; my ($html, $res); - my $approxidate = '1.hour.from.now'; + my $approxidate = 'now'; for my $req ('/test/?q=%C3%86var', '/test/?q=%25C3%2586var') { $res = $cb->(GET($req."+d:..$approxidate")); $html = $res->content; @@ -135,7 +136,7 @@ test_psgi(sub { $www->call(@_) }, sub { qr/filename=no-subject\.mbox\.gz/); # "full threads" mbox.gz download - $res = $cb->(POST('/test/?q=s:test+d:..1.hour.from.now&x=m&t')); + $res = $cb->(POST("/test/?q=s:test+d:..$approxidate&x=m&t")); is($res->code, 200, 'successful mbox download with threads'); gunzip(\($res->content) => \(my $before)); is_deeply([ "Message-ID: <$mid>\n", "Message-ID: \n" ], -- cgit v1.2.3-24-ge0c7