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.19.2.3 -r1.19.2.4 --- openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl 23 Oct 2019 07:49:44 -0000 1.19.2.3 +++ openacs-4/packages/oacs-dav/tcl/tDAV-procs.tcl 28 Dec 2021 16:58:27 -0000 1.19.2.4 @@ -1637,8 +1637,8 @@ set tdav_shares [ns_configsection "ns/server/[ns_info server]/tdav/shares"] if { "" ne $tdav_shares } { - for {set i 0} {$i < [ns_set size $tdav_shares]} {incr i} { - set tdav_share [ns_configsection "ns/server/[ns_info server]/tdav/share/[ns_set key $tdav_shares $i]"] + foreach s [ns_set keys $tdav_shares] { + set tdav_share [ns_configsection "ns/server/[ns_info server]/tdav/share/$s"] tdav::apply_filters [ns_set get $tdav_share uri] [ns_set get $tdav_share options] [ns_set get $tdav_share enablefilesystem] # uncomment the next line if you are using ns_perm authentication # tdav::allow_group [ns_set get $tdav_share uri] tdav