Index: openacs-4/packages/file-storage/www/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/index.vuh,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/file-storage/www/index.vuh	10 Nov 2003 02:44:25 -0000	1.1.2.1
@@ -0,0 +1,20 @@
+# 
+#
+# Redirect to download files by URL
+# enables WebDAV as well as just making it easier to download stuff
+# @author Dave Bauer (dave@thedesignexperience.org)
+# @creation-date 2003-10-19
+# @cvs-id $Id: index.vuh,v 1.1.2.1 2003/11/10 02:44:25 daveb Exp $
+
+set full_uri [ad_conn url]
+set extra_uri [ad_conn path_info]
+set root_folder [fs_get_root_folder]
+set file_item_id [fs::get_item_id -name $extra_uri -folder_id $root_folder]
+permission::require_permission \
+    -object_id $file_item_id \
+    -privilege read \
+-party_id [ad_conn user_id]
+
+set file_live_revision [item::get_live_revision $file_item_id]
+
+cr_write_content -revision_id $file_live_revision
\ No newline at end of file