Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Fixed bug #1013. Works for me, if someone can check.

Browse source
This commit is contained in:
doxulting 2005-10-05 16:19:21 +00:00
parent 20bb2896d6
commit b65bf02b9c
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
search.marc/search.pl
View file

@ -130,7 +130,15 @@ if ($op eq "do_search") {
if ($tag) {
push @tags,$dbh->quote("$tag$subfield");
} else {
push @tags, $dbh->quote(substr($marc,0,4));
if ($marc =~ /^(\d){3}(. -)(.)*/)
{
# The user is using the search catalogue part, more fields
push @tags, $dbh->quote(substr($marc,0,4));
}
else
{
push @tags, $marc;
}
}
} else {
push @tags, "";