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.13 -r1.14
--- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	23 Sep 2003 21:26:43 -0000	1.13
+++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	3 Oct 2003 15:15:40 -0000	1.14
@@ -1573,7 +1573,7 @@
     ns_normalizepath $value
     
     # check to make sure path is to an authorized directory
-    set tmpdir_list [ad_parameter_all_values_as_list TmpDir]
+    set tmpdir_list [ad_parameter_all_values_as_list -package_id [site_node_closest_ancestor_package "acs-subsite"] TmpDir]
     if { [empty_string_p $tmpdir_list] } {
 	set tmpdir_list [list "/var/tmp" "/tmp"]
     }