projects
/
koha_gimpoz
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 7310: Improving list permissions: Deleting patron
[koha_gimpoz]
/
members
/
deletemem.pl
diff --git
a/members/deletemem.pl
b/members/deletemem.pl
index
924245a
..
a813cd6
100755
(executable)
--- a/
members/deletemem.pl
+++ b/
members/deletemem.pl
@@
-30,6
+30,7
@@
use C4::Output;
use C4::Auth;
use C4::Members;
use C4::Branch; # GetBranches
use C4::Auth;
use C4::Members;
use C4::Branch; # GetBranches
+use C4::VirtualShelves (); #no import
my $input = new CGI;
my $input = new CGI;
@@
-117,6
+118,7
@@
output_html_with_http_headers $input, $cookie, $template->output;
} else {
MoveMemberToDeleted($member);
} else {
MoveMemberToDeleted($member);
+ C4::VirtualShelves::HandleDelBorrower($member);
DelMember($member);
print $input->redirect("/cgi-bin/koha/members/members-home.pl");
}
DelMember($member);
print $input->redirect("/cgi-bin/koha/members/members-home.pl");
}