View | Details | Raw Unified | Return to bug 40429
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Patron/Modifications.t (-16 / +23 lines)
Lines 19-25 use Modern::Perl; Link Here
19
19
20
use utf8;
20
use utf8;
21
21
22
use Test::More tests => 7;
22
use Test::More tests => 8;
23
use Test::NoWarnings;
23
use Test::Exception;
24
use Test::Exception;
24
25
25
use t::lib::TestBuilder;
26
use t::lib::TestBuilder;
Lines 49-57 subtest 'new() tests' => sub { Link Here
49
50
50
    Koha::Patron::Modifications->search->delete;
51
    Koha::Patron::Modifications->search->delete;
51
52
53
    my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
54
52
    # Create new pending modification
55
    # Create new pending modification
53
    Koha::Patron::Modification->new(
56
    Koha::Patron::Modification->new(
54
        {
57
        {
58
            borrowernumber     => $patron->borrowernumber,
55
            verification_token => '1234567890',
59
            verification_token => '1234567890',
56
            changed_fields     => 'surname,firstname',
60
            changed_fields     => 'surname,firstname',
57
            surname            => 'Hall',
61
            surname            => 'Hall',
Lines 443-451 subtest 'dateofbirth tests' => sub { Link Here
443
        { class => 'Koha::Patrons', value => { dateofbirth => '1980-01-01', surname => 'a_surname' } } );
447
        { class => 'Koha::Patrons', value => { dateofbirth => '1980-01-01', surname => 'a_surname' } } );
444
    my $patron_modification = Koha::Patron::Modification->new(
448
    my $patron_modification = Koha::Patron::Modification->new(
445
        {
449
        {
446
            changed_fields => 'borrowernumber,dateofbirth',
450
            verification_token => '1234567890',
447
            borrowernumber => $patron->borrowernumber,
451
            changed_fields     => 'borrowernumber,dateofbirth',
448
            dateofbirth    => undef
452
            borrowernumber     => $patron->borrowernumber,
453
            dateofbirth        => undef
449
        }
454
        }
450
    )->store;
455
    )->store;
451
    $patron_modification->approve;
456
    $patron_modification->approve;
Lines 459-467 subtest 'dateofbirth tests' => sub { Link Here
459
    # Adding a dateofbirth
464
    # Adding a dateofbirth
460
    $patron_modification = Koha::Patron::Modification->new(
465
    $patron_modification = Koha::Patron::Modification->new(
461
        {
466
        {
462
            changed_fields => 'borrowernumber,dateofbirth',
467
            verification_token => '1234567890',
463
            borrowernumber => $patron->borrowernumber,
468
            changed_fields     => 'borrowernumber,dateofbirth',
464
            dateofbirth    => '1980-02-02'
469
            borrowernumber     => $patron->borrowernumber,
470
            dateofbirth        => '1980-02-02'
465
        }
471
        }
466
    )->store;
472
    )->store;
467
    $patron_modification->approve;
473
    $patron_modification->approve;
Lines 476-485 subtest 'dateofbirth tests' => sub { Link Here
476
    # Modifying a dateofbirth
482
    # Modifying a dateofbirth
477
    $patron_modification = Koha::Patron::Modification->new(
483
    $patron_modification = Koha::Patron::Modification->new(
478
        {
484
        {
479
            changed_fields => 'borrowernumber,dateofbirth',
485
            verification_token => '1234567890',
480
            borrowernumber => $patron->borrowernumber,
486
            changed_fields     => 'borrowernumber,dateofbirth',
481
            dateofbirth    => '1980-03-03',
487
            borrowernumber     => $patron->borrowernumber,
482
            surname        => undef
488
            dateofbirth        => '1980-03-03',
489
            surname            => undef
483
        }
490
        }
484
    )->store;
491
    )->store;
485
    $patron_modification->approve;
492
    $patron_modification->approve;
Lines 494-503 subtest 'dateofbirth tests' => sub { Link Here
494
    # Modifying something else
501
    # Modifying something else
495
    $patron_modification = Koha::Patron::Modification->new(
502
    $patron_modification = Koha::Patron::Modification->new(
496
        {
503
        {
497
            changed_fields => 'borrowernumber,surname',
504
            verification_token => '1234567890',
498
            borrowernumber => $patron->borrowernumber,
505
            changed_fields     => 'borrowernumber,surname',
499
            surname        => 'another_surname',
506
            borrowernumber     => $patron->borrowernumber,
500
            dateofbirth    => undef
507
            surname            => 'another_surname',
508
            dateofbirth        => undef
501
        }
509
        }
502
    )->store;
510
    )->store;
503
    $patron_modification->approve;
511
    $patron_modification->approve;
504
- 

Return to bug 40429