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.9 -r1.10
--- openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	29 Jun 2004 10:18:43 -0000	1.9
+++ openacs-4/packages/oacs-dav/tcl/oacs-dav-procs.tcl	27 Sep 2004 19:16:50 -0000	1.10
@@ -307,7 +307,7 @@
 
     set destination [ns_urldecode [ns_set iget [ns_conn headers] Destination]]
 
-    regsub {http://[^/]+/} $destination {/} dest
+    regsub {(http|https)://[^/]+/} $destination {/} dest
 
      regsub $dav_url_regexp $dest {} dest