- Added keyword tagging api.

This commit is contained in:
JT Smith 2007-07-07 04:37:38 +00:00
parent 83310ba311
commit 23fa0283b3
11 changed files with 354 additions and 12 deletions

View file

@ -125,7 +125,10 @@ sub create {
my $url = $asset->get("url");
$url =~ s/\/|\-|\_/ /g;
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 $keywords = join(" ",$asset->get("title"), $asset->get("menuTitle"), $asset->get("synopsis"), $url,
$description);
$keywords .= WebGUI::Keyword->new($self->session)->getKeywordsForAsset({asset=>$asset});
$keywords = WebGUI::HTML::filter($keywords, "all");
my $synopsis = $asset->get("synopsis") || substr($description,0,255) || substr($keywords,0,255);
#-------------------- added by zxp for chinese word segment