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

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/deletemem.tt (+3 lines)
Lines 38-43 Link Here
38
        [%# TODO add "patron does not exist" unless patron %]
38
        [%# TODO add "patron does not exist" unless patron %]
39
        <div class="dialog alert">
39
        <div class="dialog alert">
40
            <h3>Are you sure you want to delete the patron [% patron.firstname | html %] [% patron.surname | html %]? This cannot be undone.</h3>
40
            <h3>Are you sure you want to delete the patron [% patron.firstname | html %] [% patron.surname | html %]? This cannot be undone.</h3>
41
            [% IF pending_suggestions > 0 %]
42
                <h3>Note that this patron has [% pending_suggestions %] pending suggestions.</h3>
43
            [% END %]
41
            <form action="/cgi-bin/koha/members/deletemem.pl">
44
            <form action="/cgi-bin/koha/members/deletemem.pl">
42
                <input type="hidden" name="csrf_token" value="[% csrf_token | html %]" />
45
                <input type="hidden" name="csrf_token" value="[% csrf_token | html %]" />
43
                <input type="hidden" name="member" value="[% patron.borrowernumber | html %]"/>
46
                <input type="hidden" name="member" value="[% patron.borrowernumber | html %]"/>
(-)a/members/deletemem.pl (-1 / +9 lines)
Lines 28-33 use C4::Context; Link Here
28
use C4::Output;
28
use C4::Output;
29
use C4::Auth;
29
use C4::Auth;
30
use C4::Members;
30
use C4::Members;
31
use C4::Suggestions qw( SearchSuggestion );
31
use Koha::Patrons;
32
use Koha::Patrons;
32
use Koha::Token;
33
use Koha::Token;
33
use Koha::Patron::Categories;
34
use Koha::Patron::Categories;
Lines 100-105 if ( $op eq 'delete_confirm' or $countissues > 0 or $charges or $is_guarantor ) Link Here
100
        $template->param(guarantees => 1);
101
        $template->param(guarantees => 1);
101
    }
102
    }
102
103
104
    # Add warning if patron has pending suggestions
105
    $template->param(
106
        pending_suggestions => scalar @{
107
        C4::Suggestions::SearchSuggestion(
108
                { suggestedby => $member, STATUS => 'ASKED' }
109
            )
110
        }
111
    );
103
    # This is silly written but reflect the same conditions as above
112
    # This is silly written but reflect the same conditions as above
104
    if ( not $countissues > 0 and not $charges and not $is_guarantor ) {
113
    if ( not $countissues > 0 and not $charges and not $is_guarantor ) {
105
        $template->param(
114
        $template->param(
106
- 

Return to bug 10910