Index: openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl,v
diff -u -N -r1.4.2.11 -r1.4.2.12
--- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	10 Apr 2004 00:34:33 -0000	1.4.2.11
+++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	14 Apr 2004 17:40:31 -0000	1.4.2.12
@@ -144,7 +144,16 @@
                                       -party_id $user_id \
                                       -privilege "create"] ]
 	}
-	propfind -
+	propfind {
+	    if {!$user_id} {
+		ns_returnunauthorized
+	    } else {
+		set authorized_p [permission::permission_p \
+				  -object_id $item_id \
+				  -party_id $user_id \
+				  -privilege "read"]
+	    }
+	}
 	head -
 	get {
 	    # default for GET PROPFIND 
@@ -635,6 +644,8 @@
     foreach fragment [split [ad_conn url] "/"] {
     	lappend encoded_uri [ns_urlencode $fragment]
     }   
+    # MS Web Folders can't handle encoded . in filenames so decode it
+    regsub -all {%2e} $encoded_uri {.} encoded_uri
     set folder_uri "[ad_url][join $encoded_uri "/"]"
     
    if {![string match */ $folder_uri]} {