projects
/
koha-ffzg.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3153d38
)
Bug fix from rel-1-2
author
tonnesen
<tonnesen>
Tue, 9 Jul 2002 03:07:05 +0000
(
03:07
+0000)
committer
tonnesen
<tonnesen>
Tue, 9 Jul 2002 03:07:05 +0000
(
03:07
+0000)
subjectsearch.pl
patch
|
blob
|
history
diff --git
a/subjectsearch.pl
b/subjectsearch.pl
index
6c8ca78
..
d26be68
100755
(executable)
--- a/
subjectsearch.pl
+++ b/
subjectsearch.pl
@@
-45,8
+45,8
@@
while ($i < $count){
my @results=split('\t',$items[$i]);
$results[0]=mklink("/cgi-bin/koha/detail.pl?bib=$results[2]&type=$type",$results[0]);
my $word=$results[1];
my @results=split('\t',$items[$i]);
$results[0]=mklink("/cgi-bin/koha/detail.pl?bib=$results[2]&type=$type",$results[0]);
my $word=$results[1];
- $word=~ s/ //g;
- $word=~ s/\,/\,%20/;
+ $word=~ s/ /
%20
/g;
+
#
$word=~ s/\,/\,%20/;
$results[1]=mklink("/cgi-bin/koha/search.pl?author=$word&type=$type",$results[1]);
my ($count,$lcount,$nacount,$fcount,$scount)=itemcount($env,$results[2]);
$results[3]=$count;
$results[1]=mklink("/cgi-bin/koha/search.pl?author=$word&type=$type",$results[1]);
my ($count,$lcount,$nacount,$fcount,$scount)=itemcount($env,$results[2]);
$results[3]=$count;