koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] koha/C4 Search.pm [dev_week]


From: Joshua Ferraro
Subject: [Koha-cvs] koha/C4 Search.pm [dev_week]
Date: Mon, 04 Dec 2006 16:45:12 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         dev_week
Changes by:     Joshua Ferraro <kados>  06/12/04 16:45:12

Modified files:
        C4             : Search.pm 

Log message:
        commenting out warns

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.99.2.11.2.35&r2=1.99.2.11.2.36

Patches:
Index: Search.pm
===================================================================
RCS file: /sources/koha/koha/C4/Search.pm,v
retrieving revision 1.99.2.11.2.35
retrieving revision 1.99.2.11.2.36
diff -u -b -r1.99.2.11.2.35 -r1.99.2.11.2.36
--- Search.pm   4 Dec 2006 05:41:02 -0000       1.99.2.11.2.35
+++ Search.pm   4 Dec 2006 16:45:12 -0000       1.99.2.11.2.36
@@ -40,7 +40,7 @@
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.99.2.11.2.35 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.99.2.11.2.36 $' =~ /\d+/g;
           shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 =head1 NAME
@@ -1319,11 +1319,11 @@
         $authorised_valuecode = $sthnflstatus->fetchrow;
         if ($authorised_valuecode) {
             #warn "authorised valuecode: $authorised_valuecode";
-                       warn "itemlost: ".$data->{itemlost};
+                       #warn "itemlost: ".$data->{itemlost};
             $sthnflstatus = $dbh->prepare("select lib from authorised_values 
where category=? and authorised_value=?");
             $sthnflstatus->execute($authorised_valuecode,$data->{itemlost});
             my ($lib) = $sthnflstatus->fetchrow;
-            warn "lib: $lib from $authorised_valuecode,$data->{itemlost}";
+            #warn "lib: $lib from $authorised_valuecode,$data->{itemlost}";
             $data->{itemlosttext} = $lib;
         }
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]