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

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember.tt (-2 / +2 lines)
Lines 698-704 Link Here
698
                            [% END %]
698
                            [% END %]
699
699
700
                            <li>
700
                            <li>
701
                                <a id="debarments-tab-link" href="#reldebarments">Restrictions ([% debarments.size || 0 | html %])</a>
701
                                <a id="debarments-tab-link" href="#reldebarments">Restrictions ([% patron.restrictions.count | html %])</a>
702
                            </li>
702
                            </li>
703
703
704
                            [% SET enrollments = patron.get_club_enrollments %]
704
                            [% SET enrollments = patron.get_club_enrollments %]
Lines 732-738 Link Here
732
                            </div>
732
                            </div>
733
                        [% END %]
733
                        [% END %]
734
734
735
                        [% INCLUDE borrower_debarments.inc %]
735
                        [% INCLUDE 'patron-restrictions-tab.inc' %]
736
736
737
                        [% IF ( CAN_user_circulate_circulate_remaining_permissions ) %]
737
                        [% IF ( CAN_user_circulate_circulate_remaining_permissions ) %]
738
                            <div id="reserves">
738
                            <div id="reserves">
(-)a/members/moremember.pl (-5 / +1 lines)
Lines 36-42 use C4::Form::MessagingPreferences; Link Here
36
use List::MoreUtils qw( uniq );
36
use List::MoreUtils qw( uniq );
37
use Scalar::Util qw( looks_like_number );
37
use Scalar::Util qw( looks_like_number );
38
use Koha::Patron::Attribute::Types;
38
use Koha::Patron::Attribute::Types;
39
use Koha::Patron::Debarments qw( GetDebarments );
40
use Koha::Patron::Restriction::Types;
39
use Koha::Patron::Restriction::Types;
41
use Koha::Patron::Messages;
40
use Koha::Patron::Messages;
42
use Koha::CsvProfiles;
41
use Koha::CsvProfiles;
Lines 81-92 for (qw(gonenoaddress lost borrowernotes is_debarred)) { Link Here
81
}
80
}
82
81
83
$template->param(
82
$template->param(
84
    restriction_types => scalar Koha::Patron::Restriction::Types->keyed_on_code()
83
    restriction_types => scalar Koha::Patron::Restriction::Types->search()
85
);
84
);
86
85
87
if ( $patron->is_debarred ) {
86
if ( $patron->is_debarred ) {
88
    $template->param(
87
    $template->param(
89
        'debarments'      => scalar GetDebarments({ borrowernumber => $borrowernumber }),
90
        'userdebarred'    => $patron->debarred,
88
        'userdebarred'    => $patron->debarred,
91
        'debarredcomment' => $patron->debarredcomment,
89
        'debarredcomment' => $patron->debarredcomment,
92
    );
90
    );
Lines 281-287 $template->param( Link Here
281
    relatives_borrowernumbers => \@relatives,
279
    relatives_borrowernumbers => \@relatives,
282
    logged_in_user => $logged_in_user,
280
    logged_in_user => $logged_in_user,
283
    files => Koha::Patron::Files->new( borrowernumber => $borrowernumber ) ->GetFilesInfo(),
281
    files => Koha::Patron::Files->new( borrowernumber => $borrowernumber ) ->GetFilesInfo(),
284
    #debarments                => scalar GetDebarments({ borrowernumber => $borrowernumber }),
285
    has_modifications         => $has_modifications,
282
    has_modifications         => $has_modifications,
286
);
283
);
287
284
288
- 

Return to bug 31095