Index: openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl,v
diff -u -r1.2.2.7 -r1.2.2.8
--- openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl	24 Apr 2004 14:29:10 -0000	1.2.2.7
+++ openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl	25 Apr 2004 12:51:02 -0000	1.2.2.8
@@ -1104,7 +1104,10 @@
     return filter_ok
 }
 
-proc tdav::set_lock {uri depth type scope owner {timeout "180"} {locktime ""} } {
+proc tdav::set_lock {uri depth type scope owner {timeout ""} {locktime ""} } {
+    if {[string equal "" $timeout]} {
+	set timeout [ns_config "ns/server/[ns_info server]/tdav" "defaultlocktimeout" "300"]
+    }
     if {[string equal "" $locktime]} {
 	set locktime [clock format [clock seconds]]
     }