oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

- Added Chinese character support to search engine and indexer thanks to Zhou

Browse source 
Xiaopeng.
This commit is contained in:
JT Smith 2006-07-13 15:41:30 +00:00
parent 6ad290ff63
commit 1845a3e1d5
4 changed files with 25 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
docs/changelog/7.x.x.txt
View file

@ -6,6 +6,8 @@
/ Procolix)
- fix: Insert WebGUI Image inserts image, but does not retain border, spacing
or alignment.(Martin Kamerbeek / Procolix)
- Added Chinese character support to search engine and indexer thanks to Zhou
Xiaopeng.
7.0.1
- fix: User profile field "Department" needs i18n

2
docs/credits.txt
View file

@ -45,8 +45,10 @@ Contributing Developers..............Lucas Bartholemy
Steve Swanson / Plain Black
Jeff Szpak / Plain Black
Sean Tu / WDI
Vladimir Vitkovsky / WebGUI Worldwide
Madsen Wikholm
Matt Wilson / Plain Black
Zhou Xiaopeng / WebGUI Worldwide
Gerald Young

11
lib/WebGUI/Search.pm
View file

@ -270,6 +270,17 @@ sub search {
unless ($keywords =~ m/"|\*/) { # do wildcards for people, like they'd expect
my @terms = split(' ',$keywords);
for (my $i = 0; $i < scalar(@terms); $i++) {
#-------------- Edited by zxp for Chinese Word Segment
utf8::decode($terms[$i]);
my @segs = split /([A-z|\d]+|\S)/, $terms[$i];
$terms[$i] = join " ",@segs;
$terms[$i] =~ s/\s{2,}/ /g;
$terms[$i] =~ s/(^\s|\s$)//g;
$terms[$i] =~ s/\s/\'\'/g;
if($terms[$i] =~ m/\'/) { # has non-latin latter in terms
$terms[$i] = '"' . $terms[$i] . '"';
}
#-------------- Edited by zxp end
$terms[$i] .= "*";
}
$keywords = join(" ", @terms);

10
lib/WebGUI/Search/Index.pm
View file

@ -112,6 +112,16 @@ sub create {
my $description = WebGUI::HTML::filter($asset->get('description'), "all");
my $keywords = WebGUI::HTML::filter(join(" ",$asset->get("title"), $asset->get("menuTitle"), $asset->get("synopsis"), $url, $description), "all");
my $synopsis = $asset->get("synopsis") || substr($description,0,255) || substr($keywords,0,255);
#-------------------- added by zxp for chinese word segment
utf8::decode($keywords);
my @segs = split /([A-z|\d]+|\S)/, $keywords;
$keywords = join " ",@segs;
$keywords =~ s/\s{2,}/ /g;
$keywords =~ s/(^\s|\s$)//g;
$keywords =~ s/\s/\'\'/g;
#-------------------- added by zxp end
my $add = $self->session->db->prepare("insert into assetIndex (assetId, title, url, creationDate, revisionDate,
ownerUserId, groupIdView, groupIdEdit, lineage, className, synopsis, keywords) values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ? )");
$add->execute([$asset->getId, $asset->get("title"), $asset->get("url"), $asset->get("creationDate"),