[Koha-patches] [PATCH 2/4] remove extraneous warns
Galen Charlton
gmcharlt at gmail.com
Fri Jul 2 14:48:13 CEST 2010
Signed-off-by: Galen Charlton <gmcharlt at gmail.com>
---
acqui/basketgroup.pl | 3 ---
1 files changed, 0 insertions(+), 3 deletions(-)
diff --git a/acqui/basketgroup.pl b/acqui/basketgroup.pl
index 94c5814..a3b7dc9 100755
--- a/acqui/basketgroup.pl
+++ b/acqui/basketgroup.pl
@@ -184,7 +184,6 @@ sub printbasketgrouppdf{
my $pdfformat = C4::Context->preference("OrderPdfFormat");
eval "use $pdfformat" ;
- warn @_;
eval "use C4::Branch";
my $basketgroup = GetBasketgroup($basketgroupid);
@@ -386,9 +385,7 @@ if ( $op eq "add" ) {
printbasketgrouppdf($basketgroupid);
}elsif( $op eq "delete"){
my $basketgroupid = $input->param('basketgroupid');
- warn $basketgroupid;
DelBasketgroup($basketgroupid);
- warn "---------------";
print $input->redirect('/cgi-bin/koha/acqui/basketgroup.pl?booksellerid=' . $booksellerid);
}elsif ( $op eq 'reopen'){
--
1.7.0
More information about the Koha-patches
mailing list