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

(-)a/Koha/Patron.pm (+11 lines)
Lines 431-436 sub library { Link Here
431
    return Koha::Library->_new_from_dbic($self->_result->branchcode);
431
    return Koha::Library->_new_from_dbic($self->_result->branchcode);
432
}
432
}
433
433
434
=head3 sms_provider
435
436
Returns a Koha::SMS::Provider object representing the patron's SMS provider.
437
438
=cut
439
440
sub sms_provider {
441
    my ( $self ) = @_;
442
    return Koha::SMS::Provider->_new_from_dbic($self->_result->sms_provider);
443
}
444
434
=head3 guarantor_relationships
445
=head3 guarantor_relationships
435
446
436
Returns Koha::Patron::Relationships object for this patron's guarantors
447
Returns Koha::Patron::Relationships object for this patron's guarantors
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember.tt (+4 lines)
Lines 414-419 Link Here
414
                                                    <span class="label">SMS number:</span>
414
                                                    <span class="label">SMS number:</span>
415
                                                    <a href="sms:[% patron.smsalertnumber | uri %]">[% patron.smsalertnumber | html %]</a>
415
                                                    <a href="sms:[% patron.smsalertnumber | uri %]">[% patron.smsalertnumber | html %]</a>
416
                                                </li>
416
                                                </li>
417
                                                <li>
418
                                                    <span class="label">SMS provider:</span>
419
                                                    [% patron.sms_provider.name | html %]
420
                                                </li>
417
                                            </ol>
421
                                            </ol>
418
                                        </div>
422
                                        </div>
419
                                    [% END %]
423
                                    [% END %]
(-)a/t/db_dependent/Koha/Patrons.t (-2 / +9 lines)
Lines 19-25 Link Here
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
22
use Test::More tests => 40;
22
use Test::More tests => 41;
23
use Test::Warn;
23
use Test::Warn;
24
use Test::Exception;
24
use Test::Exception;
25
use Test::MockModule;
25
use Test::MockModule;
Lines 88-93 subtest 'library' => sub { Link Here
88
    is( ref($retrieved_patron_1->library), 'Koha::Library', 'Koha::Patron->library should return a Koha::Library object' );
88
    is( ref($retrieved_patron_1->library), 'Koha::Library', 'Koha::Patron->library should return a Koha::Library object' );
89
};
89
};
90
90
91
subtest 'sms_provider' => sub {
92
    plan tests => 2;
93
    my $sms_provider = $builder->build({source => 'SmsProvider' });
94
    $retrieved_patron_1->sms_provider_id( $sms_provider->{id} )->store;
95
    is_deeply( $retrieved_patron_1->sms_provider->unblessed, $sms_provider, 'Koha::Patron->sms_provider returns the correct SMS provider' );
96
    is( ref($retrieved_patron_1->sms_provider), 'Koha::SMS::Provider', 'Koha::Patron->sms_provider should return a Koha::SMS::Provider object' );
97
};
98
91
subtest 'guarantees' => sub {
99
subtest 'guarantees' => sub {
92
    plan tests => 13;
100
    plan tests => 13;
93
101
94
- 

Return to bug 23495