[Koha-cvs] koha/members deletemem.pl

Antoine Farnault antoine at koha-fr.org
Tue Jul 10 17:18:27 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Antoine Farnault <toins>	07/07/10 15:18:27

Modified files:
	members        : deletemem.pl 

Log message:
	syspref already writed in Auth.pm

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/deletemem.pl?cvsroot=koha&r1=1.16&r2=1.17

Patches:
Index: deletemem.pl
===================================================================
RCS file: /sources/koha/koha/members/deletemem.pl,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- deletemem.pl	2 Jul 2007 00:38:18 -0000	1.16
+++ deletemem.pl	10 Jul 2007 15:18:27 -0000	1.17
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: deletemem.pl,v 1.16 2007/07/02 00:38:18 rangi Exp $
+# $Id: deletemem.pl,v 1.17 2007/07/10 15:18:27 toins Exp $
 
 #script to delete items
 #written 2/5/00
@@ -84,21 +84,6 @@
 	if ($data ne '') {
 		$template->param(guarantees => 1);
 	}
-# 	print "<table border=1>";
-# 	if ($i > 0){
-# 		print "<TR><TD>Items on Issue</td><td align=right>$i</td></tr>";
-# 	}
-# 	if ($flags->{'CHARGES'} ne ''){
-# 		print "<TR><TD>Charges</td><td>$flags->{'CHARGES'}->{'message'}</tr>";
-# 	}
-# 	if ($data ne ''){
-# 		print "<TR><TD>Guarantees</td></tr>";
-# 	}
-# 	print "</table>";
-$template->param(intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),
-		intranetstylesheet => C4::Context->preference("intranetstylesheet"),
-		IntranetNav => C4::Context->preference("IntranetNav"),
-		);
 output_html_with_http_headers $input, $cookie, $template->output;
 
 } else {





More information about the Koha-cvs mailing list