projects
/
webpac2
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
09c9db4
)
unaccent search query before transfering it to search engine
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 24 Jul 2009 09:29:03 +0000
(09:29 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 24 Jul 2009 09:29:03 +0000
(09:29 +0000)
git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1249
07558da8
-63fa-0310-ba24-
9fe276d99e06
vhost/webpac2.cgi
patch
|
blob
|
history
diff --git
a/vhost/webpac2.cgi
b/vhost/webpac2.cgi
index
7c32a6e
..
d68d241
100755
(executable)
--- a/
vhost/webpac2.cgi
+++ b/
vhost/webpac2.cgi
@@
-11,6
+11,7
@@
use Data::Page;
use Data::Dump qw/dump/;
use SWISH::API;
use JSON;
+use Text::Unaccent::PurePerl qw/unac_string/;
my $range_around = 5;
my @entries_per_page = ( 30, 50, 100, 500 );
@@
-191,6
+192,8
@@
print
if ( my $search = param('search') ) {
+ $search = unac_string( $search );
+
print qq|
<a href="#form" class="skip" title="skip to search form">#</a>
<div id="results">