X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=xt%2Fmsgtime_cmp.t;h=4ebf5b2cedb85a859b771873452de3d92f95fb2b;hb=fd966061df6a61104935984bed7c28a461a124ff;hp=4f798006fb63685830925e8033c3a2abaeb175a7;hpb=a09f678d8254064af7ca6dcfb3c3f84b5ae37b51;p=public-inbox.git diff --git a/xt/msgtime_cmp.t b/xt/msgtime_cmp.t index 4f798006..4ebf5b2c 100644 --- a/xt/msgtime_cmp.t +++ b/xt/msgtime_cmp.t @@ -1,5 +1,5 @@ #!perl -w -# Copyright (C) 2019 all contributors +# Copyright (C) 2019-2020 all contributors # License: AGPL-3.0+ use strict; use Test::More; @@ -82,6 +82,13 @@ sub str2date_zone ($) { # off is the time zone offset in seconds from GMT my ($ss,$mm,$hh,$day,$month,$year,$off) = Date::Parse::strptime($date); + + # new behavior which wasn't in the original old version: + if ('commit d857e7dc0d816b635a7ead09c3273f8c2d2434be') { + # "msgtime: assume +0000 if TZ missing when using Date::Parse" + $off //= '+0000'; + } + return undef unless(defined $off); # Compute the time zone from offset