projects
/
koha_gimpoz
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
c17b17f
)
Adding a few more search options
author
rangi
<rangi>
Mon, 6 Mar 2006 04:58:16 +0000
(
04:58
+0000)
committer
rangi
<rangi>
Mon, 6 Mar 2006 04:58:16 +0000
(
04:58
+0000)
C4/SearchMarc.pm
patch
|
blob
|
history
diff --git
a/C4/SearchMarc.pm
b/C4/SearchMarc.pm
index
c374679
..
3db9477
100644
(file)
--- a/
C4/SearchMarc.pm
+++ b/
C4/SearchMarc.pm
@@
-228,7
+228,12
@@
sub catalogsearch {
$query .= "Title all \"".@$value[$i]."\"";
} elsif ($field eq 'biblioitems.isbn') {
$query .= "Isbn= ".@$value[$i];
$query .= "Title all \"".@$value[$i]."\"";
} elsif ($field eq 'biblioitems.isbn') {
$query .= "Isbn= ".@$value[$i];
+ } elsif ($field eq 'bibliosubject.subject'){
+ $query.="Subject all \"@$value[$i]\"";
+ } elsif ($field eq 'biblioitems.itemtype'){
+ $query="Itemtype=@$value[$i]";
} else {
} else {
+ warn $field;
my @spacedout=split(/ /,@$value[$i]);
my $text = join(" and ",@spacedout);
$query .= "$text";
my @spacedout=split(/ /,@$value[$i]);
my $text = join(" and ",@spacedout);
$query .= "$text";