Index: openacs-4/packages/fs-portlet/www/fs-contents-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/www/fs-contents-portlet.tcl,v
diff -u -r1.5.2.1.4.4 -r1.5.2.1.4.5
--- openacs-4/packages/fs-portlet/www/fs-contents-portlet.tcl	22 Dec 2004 17:28:35 -0000	1.5.2.1.4.4
+++ openacs-4/packages/fs-portlet/www/fs-contents-portlet.tcl	22 Dec 2004 17:33:14 -0000	1.5.2.1.4.5
@@ -73,10 +73,12 @@
     -url [ad_conn url]?folder_id=$folder_id \
     ]
 
-set use_webdav_p  [ad_parameter "UseWebDavP"]
-
-if { $use_webdav_p == 1} { 
-    set webdav_url [fs::webdav_url -item_id $folder_id]
+if [exists_and_not_null file_storage_package_id] {
+    set use_webdav_p  [parameter::get -package_id $file_storage_package_id -parameter "UseWebDavP"]
+    
+    if { $use_webdav_p == 1} { 
+	set webdav_url [fs::webdav_url -item_id $folder_id -package_id $file_storage_package_id]
+    }
 }
 
 ad_return_template