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

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/members/members-update.tt (+8 lines)
Lines 166-171 Link Here
166
                                        </table>
166
                                        </table>
167
                                    </div>
167
                                    </div>
168
                                  [%  END %]
168
                                  [%  END %]
169
                                  [% IF borrowers.$borrowernumber.gonenoaddress > 0 %]
170
                                    <div class="dialog message" style="margin-top:.8em">
171
                                        <h4>Patron's address in doubt</h4>
172
                                        <p>The <strong>Gone no address</strong> flag is set for this patron. If this modification request resolves the issue, please unset the flag.</p>
173
                                        <input type="checkbox" id="unset_gna_[% pm.borrowernumber %]" name="unset_gna_[% pm.borrowernumber %]" value="unset_gna_[% pm.borrowernumber %]"/>
174
                                        <label for="unset_gna_[% pm.borrowernumber %]">Unset Gone no address for this patron</label>
175
                                    </div>
176
                                  [% END %]
169
                                </div>
177
                                </div>
170
                            [% END %]
178
                            [% END %]
171
                        </div>
179
                        </div>
(-)a/members/members-update-do.pl (-1 / +9 lines)
Lines 49-54 foreach my $param (@params) { Link Here
49
49
50
        if ( $action eq 'approve' ) {
50
        if ( $action eq 'approve' ) {
51
            my $m = Koha::Patron::Modifications->find( { borrowernumber => $borrowernumber } );
51
            my $m = Koha::Patron::Modifications->find( { borrowernumber => $borrowernumber } );
52
53
            if ($query->param("unset_gna_$borrowernumber")) {
54
                # Unset gone no address
55
                ModMember(
56
                    borrowernumber => $borrowernumber,
57
                    gonenoaddress  => undef
58
                );
59
            }
60
52
            $m->approve() if $m;
61
            $m->approve() if $m;
53
        }
62
        }
54
        elsif ( $action eq 'deny' ) {
63
        elsif ( $action eq 'deny' ) {
55
- 

Return to bug 19400