Possible values are$__template_variables__"
}
return $template_value
Index: openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl 26 Jul 2006 22:56:46 -0000 1.11
+++ openacs-4/packages/xowiki/tcl/xowiki-sc-procs.tcl 31 Jul 2006 21:24:12 -0000 1.12
@@ -13,7 +13,7 @@
returns a datasource for the search package
} {
- ns_log notice "--datasource called with revision_id = $revision_id"
+ ns_log notice "--sc datasource called with revision_id = $revision_id"
set page [::xowiki::Package instantiate_from_page -revision_id $revision_id]
$page volatile
@@ -22,13 +22,24 @@
set text [ad_html_text_convert -from text/html -to text/plain -- $html]
#set text [ad_text_to_html $html]; #this could be used for entity encoded html text in rss entries
- ns_log notice "-- INDEXING $revision_id -> $text"
+ #ns_log notice "--sc INDEXING $revision_id -> $text"
#$page set unresolved_references 0
$page instvar item_id
+ db_dml delete_old_revisions {delete from txt where object_id in \
+ (select revision_id from cr_revisions where item_id = :item_id and revision_id != :revision_id)}
+ foreach tag {h1 h2 h3 h4 h5 b strong} {
+ foreach {match words} [regexp -all -inline "<$tag>(\[^<\]+)$tag>" $html] {
+ foreach w [split $words] {
+ if {$w eq ""} continue
+ set word($w) 1
+ }
+ }
+ }
+ ns_log notice "--sc keywords $revision_id -> [array names word]"
return [list object_id $revision_id title [$page title] \
- content $text keywords {} \
- storage_type text mime text/plain \
+ content $html keywords [array names word] \
+ storage_type text mime text/html \
syndication [list \
link [::xowiki::Page pretty_link -fully_qualified 1 [$page set name]] \
description $text \
Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 26 Jul 2006 22:56:46 -0000 1.1
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 31 Jul 2006 21:24:12 -0000 1.2
@@ -122,7 +122,7 @@
set page [self]
$package_id return_page -adp $template_file -variables {
references name title item_id page context header_stuff return_url
- content references lang_links
+ content references lang_links package_id
rev_link edit_link delete_link new_link admin_link index_link
tags no_tags tags_with_links save_tag_link popular_tags_link
gc_link gc_comments
Index: openacs-4/packages/xowiki/www/view-default.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/Attic/view-default.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xowiki/www/view-default.adp 26 Jul 2006 22:56:46 -0000 1.1
+++ openacs-4/packages/xowiki/www/view-default.adp 31 Jul 2006 21:24:13 -0000 1.2
@@ -32,7 +32,11 @@