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.4.2.20 -r1.4.2.21
--- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	25 Oct 2004 16:28:03 -0000	1.4.2.20
+++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	16 Nov 2004 09:43:28 -0000	1.4.2.21
@@ -164,7 +164,7 @@
                                       -privilege "create"] ]
 	}
 	propfind {
-	    if {!$user_id} {
+	    if {[empty_string_p $user_id]} {
 		ns_returnunauthorized
 	    } else {
 		set authorized_p [permission::permission_p \