From 5000709e138318fc7143949e95c47666e2448839 Mon Sep 17 00:00:00 2001 From: Karam Qubsi Date: Sat, 4 May 2013 23:44:57 +0300 Subject: [PATCH] Bug 10176: Solve the Invalid URLs in 'Refine Search Results' when it uses UNICODE symbols I just add use utf8; to the Search.pm and the problem was solved . Test plan : 1- Add bib records with non-latin characters 2- search for some of these records 3- try to refine your search using Subject / Author Signed-off-by: Bernardo Gonzalez Kriegel Comment: Work fixing URLs in facets. Now they work correctly. No errors. Signed-off-by: Katrin Fischer Passes all tests and QA script. I tested facets with the 22 Arabic records provided on bug 9579 successfully. Before the patch the links are not correct, after applying the patch the links work as expected. Signed-off-by: Jared Camins-Esakov (cherry picked from commit 2d29440c5ade462bf6939f2ab32b5ec9c2c1b377) Signed-off-by: Jared Camins-Esakov (cherry picked from commit ff7dc4ec4a7e7034ccab5f31e3a7de7f686475ba) Signed-off-by: Chris Cormack use utf8; Does not do what most people think it does, all it does is utf8 - Perl pragma to enable/disable UTF-8 (or UTF-EBCDIC) in source code IE allow Search.pm to contain utf8 chars. It does not affect any thing else From the Man Page The use utf8 pragma tells the Perl parser to allow UTF-8 in the program text in the current lexical scope (allow UTF-EBCDIC on EBCDIC based platforms). The no utf8 pragma tells Perl to switch back to treating the source text as literal bytes in the current lexical scope. Do not use this pragma for anything else than telling Perl that your script is written in UTF-8. The utility functions described below are directly usable without use utf8; . --- C4/Search.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Search.pm b/C4/Search.pm index ce6129da02..7541a7b36c 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -36,7 +36,7 @@ use URI::Escape; use Business::ISBN; use MARC::Record; use MARC::Field; - +use utf8; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG); # set the version for version checking -- 2.39.5