koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] koha/cataloguing addbooks.pl [rel_3_0]


From: Antoine Farnault
Subject: [Koha-cvs] koha/cataloguing addbooks.pl [rel_3_0]
Date: Wed, 10 Jan 2007 08:39:20 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     Antoine Farnault <toins>        07/01/10 08:39:20

Modified files:
        cataloguing    : addbooks.pl 

Log message:
        re-introduce the search.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/cataloguing/addbooks.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.4&r2=1.2.2.5

Patches:
Index: addbooks.pl
===================================================================
RCS file: /sources/koha/koha/cataloguing/addbooks.pl,v
retrieving revision 1.2.2.4
retrieving revision 1.2.2.5
diff -u -b -r1.2.2.4 -r1.2.2.5
--- addbooks.pl 4 Jan 2007 14:49:16 -0000       1.2.2.4
+++ addbooks.pl 10 Jan 2007 08:39:20 -0000      1.2.2.5
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: addbooks.pl,v 1.2.2.4 2007/01/04 14:49:16 tipaul Exp $
+# $Id: addbooks.pl,v 1.2.2.5 2007/01/10 08:39:20 toins Exp $
 
 #
 # Modified address@hidden 12:00 01 April 2001
@@ -72,7 +72,7 @@
 
 # Searching the catalog.
 if($query) {
-    my ($error, $marcresults);# = SimpleSearch($query);
+    my ($error, $marcresults) = SimpleSearch($query);
 
     if (defined $error) {
         $template->param(error => $error);
@@ -81,7 +81,7 @@
         exit;
     }
 
-    my $total;# = scalar @$marcresults;
+    my $total = scalar @$marcresults;
     my @results;
 
     for(my $i=0;$i<$total;$i++) {




reply via email to

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