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 -r1.12.2.1 -r1.12.2.2
--- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	13 Jun 2005 08:19:32 -0000	1.12.2.1
+++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	27 Sep 2005 04:04:06 -0000	1.12.2.2
@@ -158,17 +158,17 @@
                                         -object_id $item_id \
                                         -party_id $user_id \
                                         -privilege "read"] \
-                              && ([permission::permission_p \
-                                      -object_id [oacs_dav::conn dest_parent_id ] \
-                                      -party_id $user_id \
-                                      -privilege "create"] \
-                                      || [permission::permission_p \
-                                              -object_id [oacs_dav::conn dest_parent_id ] \
-                                             -party_id $user_id \
-                                              -privilege "write"])]
+				  && [permission::permission_p \
+					  -object_id [oacs_dav::conn dest_parent_id ] \
+					  -party_id $user_id \
+					  -privilege "create"]\
+				  || [permission::permission_p \
+					  -object_id [oacs_dav::conn dest_parent_id ] \
+					  -party_id $user_id \
+					  -privilege "write"]]
         }
         propfind {
-            if {!$user_id} {
+            if {[empty_string_p $user_id]} {
                 ns_returnunauthorized
             } else {
                 set authorized_p [permission::permission_p \