[Koha-patches] [PATCH] fixes warnings during searching.

Mason James mason.loves.sushi at gmail.com
Mon Mar 9 10:14:20 CET 2009


fixes many warnings during searching.

 opac-search.pl: Use of uninitialized value in concatenation (.) or string at /home/mason/git/stable/C4/Biblio.pm line 994., 
 opac-search.pl: Use of uninitialized value in concatenation (.) or string at /home/mason/git/stable/C4/Biblio.pm line 994., 
 opac-search.pl: Use of uninitialized value in concatenation (.) or string at /home/mason/git/stable/C4/Biblio.pm line 994., 

---
 C4/Biblio.pm |    8 +++++++-
 1 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index e911713..82f24bc 100755
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -993,7 +993,13 @@ sub GetCOinSBiblio {
         $issn       = $record->subfield('022','a');
 
     }
-    $coins_value = "ctx_ver=Z39.88-2004&rft_val_fmt=info%3Aofi%2Ffmt%3Akev%3Amtx%3A$mtx$genre$title&rft.isbn=$isbn&rft.issn=$issn&rft.aulast=$aulast&rft.aufirst=$aufirst$oauthors&rft.pub=$publisher&rft.date=$pubyear";
+
+    {
+        # stop 'Use of uninitialized value in concatenation (.) or string ' warning
+        no warnings 'uninitialized';
+        $coins_value = "ctx_ver=Z39.88-2004&rft_val_fmt=info%3Aofi%2Ffmt%3Akev%3Amtx%3A$mtx$genre$title&rft.isbn=$isbn&rft.issn=$issn&rft.aulast=$aulast&rft.aufirst=$aufirst$oauthors&rft.pub=$publisher&rft.date=$pubyear";
+    }
+
     $coins_value =~ s/\ /\+/g;
     #<!-- TMPL_VAR NAME="ocoins_format" -->&amp;rft.au=<!-- TMPL_VAR NAME="author" -->&amp;rft.btitle=<!-- TMPL_VAR NAME="title" -->&amp;rft.date=<!-- TMPL_VAR NAME="publicationyear" -->&amp;rft.pages=<!-- TMPL_VAR NAME="pages" -->&amp;rft.isbn=<!-- TMPL_VAR NAME=amazonisbn -->&amp;rft.aucorp=&amp;rft.place=<!-- TMPL_VAR NAME="place" -->&amp;rft.pub=<!-- TMPL_VAR NAME="publishercode" -->&amp;rft.edition=<!-- TMPL_VAR NAME="edition" -->&amp;rft.series=<!-- TMPL_VAR NAME="series" -->&amp;rft.genre="
     }
-- 
1.5.6.5




More information about the Koha-patches mailing list