I am not sure if this will work, but in sub main of search.cgi, change this code:
my @search_terms = ();
($in{'type'} eq 'phrase') ?
(@search_terms = ($in{'query'})) :
(@search_terms = split (/\s/, $in{'query'}));
to read:
my @search_terms = ();
$in{'query'} = (s/\á/a/g, $in{'query'});
$in{'query'} = (s/\é/e/g, $in{'query'});
$in{'query'} = (s/\í/i/g, $in{'query'});
$in{'query'} = (s/\ó/o/g, $in{'query'});
$in{'query'} = (s/\ú/u/g, $in{'query'});
($in{'type'} eq 'phrase') ?
(@search_terms = ($in{'query'})) :
(@search_terms = split (/\s/, $in{'query'}));
You may not need the "\" before each one and there may be a way to combine those into one regexp. I just am not up on regexp's as well as I should be.
I hope this helps.
[This message has been edited by Bobsie (edited August 30, 1999).]
Code:
# Set search type -- either phrase or keyword. Also build keyword list to search on. my @search_terms = ();
($in{'type'} eq 'phrase') ?
(@search_terms = ($in{'query'})) :
(@search_terms = split (/\s/, $in{'query'}));
to read:
Code:
# Set search type -- either phrase or keyword. Also build keyword list to search on. my @search_terms = ();
$in{'query'} = (s/\á/a/g, $in{'query'});
$in{'query'} = (s/\é/e/g, $in{'query'});
$in{'query'} = (s/\í/i/g, $in{'query'});
$in{'query'} = (s/\ó/o/g, $in{'query'});
$in{'query'} = (s/\ú/u/g, $in{'query'});
($in{'type'} eq 'phrase') ?
(@search_terms = ($in{'query'})) :
(@search_terms = split (/\s/, $in{'query'}));
You may not need the "\" before each one and there may be a way to combine those into one regexp. I just am not up on regexp's as well as I should be.
I hope this helps.
[This message has been edited by Bobsie (edited August 30, 1999).]