Bug 34912: Add 14 hours to 1970 date in Account(s).t
This makes those tests pass in whatever timezone. Test plan: Do not yet apply patch. Change timezone on commandline with: export TZ='Etc/GMT-14' NOTE: GMT-14 is what we also call UTC+14 (sign reversed). Run prove t/db_dependent/Accounts.t t/db_dependent/Koha/Account.t This fails now. Apply patch. Rerun tests and verify that they pass now. Bonus: Try some other time zone. 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 commit8d4b10fc84
) Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com> (cherry picked from commitc1078784db
) Signed-off-by: Matt Blenkinsop <matt.blenkinsop@ptfs-europe.com>
This commit is contained in:
parent
f8c0d379b5
commit
6556450b8d
2 changed files with 8 additions and 8 deletions
|
@ -945,7 +945,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
my $debit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 0,
|
||||
interface => 'commandline',
|
||||
debit_type_code => 'LOST'
|
||||
|
@ -954,7 +954,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
my $credit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => -5,
|
||||
interface => 'commandline',
|
||||
credit_type_code => 'PAYMENT'
|
||||
|
@ -978,7 +978,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
$debit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 5,
|
||||
interface => 'commanline',
|
||||
debit_type_code => 'LOST'
|
||||
|
@ -987,7 +987,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
$credit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 0,
|
||||
interface => 'commandline',
|
||||
credit_type_code => 'PAYMENT'
|
||||
|
@ -1012,7 +1012,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
$debit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 0,
|
||||
interface => 'commandline',
|
||||
debit_type_code => 'LOST'
|
||||
|
@ -1021,7 +1021,7 @@ subtest "Koha::Account::non_issues_charges tests" => sub {
|
|||
$credit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 0,
|
||||
interface => 'commandline',
|
||||
credit_type_code => 'PAYMENT'
|
||||
|
|
|
@ -1127,7 +1127,7 @@ subtest 'Koha::Account::Line::apply() handles lost items' => sub {
|
|||
my $credit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amount => -.5,
|
||||
amountoutstanding => -.5,
|
||||
interface => 'commandline',
|
||||
|
@ -1146,7 +1146,7 @@ subtest 'Koha::Account::Line::apply() handles lost items' => sub {
|
|||
$credit = Koha::Account::Line->new(
|
||||
{
|
||||
borrowernumber => $patron->id,
|
||||
date => '1970-01-01 00:00:01',
|
||||
date => '1970-01-01 14:00:01',
|
||||
amount => -.5,
|
||||
amountoutstanding => -.5,
|
||||
interface => 'commandline',
|
||||
|
|
Loading…
Reference in a new issue