From f2228f40ab201ed6762c900b157235e221c534ed Mon Sep 17 00:00:00 2001
From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Date: Wed, 27 Sep 2023 14:13:45 +0200
Subject: [PATCH] Bug 34489: Fix timezone problem in Patrons.t

See also bug 34930. Using same approach.

Test plan:
export TZ='Europe/Amsterdam'
prove t/db_dependent/Koha/Patrons.t

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 6109a41ca607f826bb7bce5083009c74139d898a)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 t/db_dependent/Koha/Patrons.t | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/t/db_dependent/Koha/Patrons.t b/t/db_dependent/Koha/Patrons.t
index 89ce426187..9f4a94eafe 100755
--- a/t/db_dependent/Koha/Patrons.t
+++ b/t/db_dependent/Koha/Patrons.t
@@ -742,6 +742,11 @@ subtest 'get_routing_lists' => sub {
 subtest 'get_age' => sub {
     plan tests => 31;
 
+    # Following tests implicitly assume timezone UTC
+    delete $C4::Context::context->{tz};
+    local %ENV;
+    $ENV{TZ} = 'Etc/UTC';
+
     my $patron = $builder->build( { source => 'Borrower' } );
     $patron = Koha::Patrons->find( $patron->{borrowernumber} );
 
@@ -819,11 +824,19 @@ subtest 'get_age' => sub {
     }
 
     $patron->delete;
+
+    # Remove timezone change
+    delete $C4::Context::context->{tz};
 };
 
 subtest 'is_valid_age' => sub {
     plan tests => 10;
 
+    # Following tests implicitly assume timezone UTC
+    delete $C4::Context::context->{tz};
+    local %ENV;
+    $ENV{TZ} = 'Etc/UTC';
+
     my $dt = dt_from_string('2020-02-28');
 
     Time::Fake->offset( $dt->epoch );
@@ -901,6 +914,9 @@ subtest 'is_valid_age' => sub {
 
     $patron->delete;
     $category->delete;
+
+    # Remove timezone change
+    delete $C4::Context::context->{tz};
 };
 
 subtest 'account' => sub {
-- 
2.39.2