[Koha-cvs] koha/circ reserve.pl [rel_3_0]

[Antoine Farnault]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     Antoine Farnault <toins>        07/01/08 15:17:59

Modified files:
        circ           : reserve.pl 

Log message:
        removing warn.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/reserve.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.3.2.6&r2=1.3.2.7

Patches:
Index: reserve.pl
===================================================================
RCS file: /sources/koha/koha/circ/reserve.pl,v
retrieving revision 1.3.2.6
retrieving revision 1.3.2.7
diff -u -b -r1.3.2.6 -r1.3.2.7
--- reserve.pl  8 Jan 2007 15:09:44 -0000       1.3.2.6
+++ reserve.pl  8 Jan 2007 15:17:59 -0000       1.3.2.7
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: reserve.pl,v 1.3.2.6 2007/01/08 15:09:44 toins Exp $
+# $Id: reserve.pl,v 1.3.2.7 2007/01/08 15:17:59 toins Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -32,9 +32,6 @@
 my $startdate=$input->param('from');
 my $enddate=$input->param('to');
 
-warn "startdate=>".$startdate;
-warn "enddate=>".$enddate;
-
 my $theme = $input->param('theme');    # only used if allowthemeoverride is set
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
@@ -73,8 +70,6 @@
 $sqldatewhere .= " && reservedate >= " . $dbh->quote($startdate)  if 
($startdate) ;
 $sqldatewhere .= " && reservedate <= " . $dbh->quote($enddate)  if ($enddate) ;
 
-warn "order=>".$order;
-
 if ($order eq "borrower") {
        $sqlorderby = " order by  borrower, reservedate";
 } elsif ($order eq "biblio") {
@@ -114,8 +109,6 @@
 
 my $sth = $dbh->prepare($strsth);
 
-warn $strsth;
-
 $sth->execute();
 
 my @reservedata;