templating mancredit and maninvoice

[koha.git] / deletemem.pl

diff --git a/deletemem.pl b/deletemem.pl
index d9d1b97..8744ee3 100755 (executable)
--- a/deletemem.pl
+++ b/deletemem.pl
@@ -32,8 +32,17 @@ use C4::Search;
 use C4::Output;
 use C4::Circulation::Circ2;
 #use C4::Acquisitions;
+use C4::Auth;
+
 
 my $input = new CGI;
+
+my $flagsrequired;
+$flagsrequired->{borrower}=1;
+my ($loggedinuser, $cookie, $sessionID) = checkauth($input, 0, $flagsrequired);
+
+
+
 #print $input->header;
 my $member=$input->param('member');
 my %env;