Index: openacs-4/packages/fs-portlet/www/fs-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/www/fs-portlet.tcl,v
diff -u -r1.17.6.3 -r1.17.6.4
--- openacs-4/packages/fs-portlet/www/fs-portlet.tcl	22 Dec 2004 17:28:35 -0000	1.17.6.3
+++ openacs-4/packages/fs-portlet/www/fs-portlet.tcl	22 Dec 2004 17:33:14 -0000	1.17.6.4
@@ -100,12 +100,13 @@
     -url [ad_conn url]?folder_id=$folder_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]
+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