From c03f94e45df02b1f4a67df0ea2b1fdaf33ffd1b4 Mon Sep 17 00:00:00 2001
From: tonnesen <tonnesen>
Date: Tue, 9 Jul 2002 03:07:05 +0000
Subject: [PATCH] Bug fix from rel-1-2

---
 subjectsearch.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/subjectsearch.pl b/subjectsearch.pl
index 6c8ca78fad..d26be680f3 100755
--- 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];
-  $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;                                                                                                                           
-- 
2.11.0