Index: openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl	13 Dec 2007 17:22:59 -0000	1.24
+++ openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl	22 Sep 2008 19:47:59 -0000	1.25
@@ -102,7 +102,7 @@
     
     @see ad_context_bar_html
 } {
-    if {![parameter::get -package_id [site_node_closest_ancestor_package "acs-subsite"] -parameter ShowContextBarP -default 1]} {
+    if {![parameter::get -package_id [ad_conn subsite_id] -parameter ShowContextBarP -default 1]} {
 	return ""
     }
     
@@ -148,7 +148,7 @@
     
     @see ad_context_bar_html
 } {
-    if {![parameter::get -package_id [site_node_closest_ancestor_package "acs-subsite"] -parameter ShowContextBarP -default 1]} {
+    if {![parameter::get -package_id [ad_conn subsite_id] -parameter ShowContextBarP -default 1]} {
 	return ""
     }
 
Index: openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	22 Mar 2008 18:31:32 -0000	1.24
+++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	22 Sep 2008 19:47:59 -0000	1.25
@@ -1595,7 +1595,7 @@
     ns_normalizepath $value
     
     # check to make sure path is to an authorized directory
-    set tmpdir_list [ad_parameter_all_values_as_list -package_id [site_node_closest_ancestor_package "acs-subsite"] TmpDir]
+    set tmpdir_list [ad_parameter_all_values_as_list -package_id [ad_conn subsite_id] TmpDir]
     if { $tmpdir_list eq "" } {
 	set tmpdir_list [list "/var/tmp" "/tmp"]
     }