Forum OpenACS Q&A: Re: Res: Re: Lazy site node caching

Collapse
Posted by Jose Agustin Lopez Bueno on
This patch for acs-tcl/tcl/site-nodes-procs.tcl
(line 551) in function site_node::get_from_url
resolve create new community problem (the new community
is not show without a server restart):

if {[catch {nsv_get site_nodes "${new_url}/"} result] == 0} {
set node_id ""
} else {
if {$new_node(has_children_p) && [lsearch $acs_subsite_dir_list $name] == -1} {
set node_id [db_string node_id "select node_id from site_nodes where parent_id = :parent_id and name=:name" -default ""]
ns_log Debug "Loading from the database $test_url $name $parent_id"
} else {
set node_id ""
}
}