projects
/
koha_gimpoz
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 7766 - C4/Auth.pm: emit DEBUG output to STDERR
[koha_gimpoz]
/
C4
/
Breeding.pm
diff --git
a/C4/Breeding.pm
b/C4/Breeding.pm
index
2b73729
..
9003f9a
100644
(file)
--- a/
C4/Breeding.pm
+++ b/
C4/Breeding.pm
@@
-169,7
+169,7
@@
C<import_biblios> tables of the Koha database.
=cut
sub BreedingSearch {
=cut
sub BreedingSearch {
- my ($
title
,$isbn,$z3950random) = @_;
+ my ($
search
,$isbn,$z3950random) = @_;
my $dbh = C4::Context->dbh;
my $count = 0;
my ($query,@bind);
my $dbh = C4::Context->dbh;
my $count = 0;
my ($query,@bind);
@@
-185,12
+185,13
@@
sub BreedingSearch {
$query .= "z3950random = ?";
@bind=($z3950random);
} else {
$query .= "z3950random = ?";
@bind=($z3950random);
} else {
+ $search =~ s/(\s+)/\%/g;
@bind=();
@bind=();
-
if ($title
) {
- $query .= "title like ?";
- push(@bind,"
$title
%");
+
if ($search
) {
+ $query .= "title like ?
OR author like ?
";
+ push(@bind,"
%$search%", "%$search
%");
}
}
- if ($
title
&& $isbn) {
+ if ($
search
&& $isbn) {
$query .= " and ";
}
if ($isbn) {
$query .= " and ";
}
if ($isbn) {