Index: openacs-4/packages/glossar/www/download/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/glossar/www/download/index.vuh,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/glossar/www/download/index.vuh	13 Oct 2005 20:30:27 -0000	1.1
@@ -0,0 +1,24 @@
+# packages/glossar/www/download/index.vuh
+
+ad_page_contract {
+
+    Virtual URL handler for file downloads
+
+    @author Kevin Scaldeferri (kevin@arsdigita.com)
+    @author Don Baccus (simplified it by using cr utility)
+    @creation-date 18 December 2000
+    @cvs-id $Id: index.vuh,v 1.1 2005/10/13 20:30:27 miguelm Exp $
+} {
+    file_id:integer,optional
+    version_id:integer,optional
+}
+
+if {![exists_and_not_null version_id]} {
+    set version_id [item::get_live_revision $file_id]
+}
+
+set user_id [ad_conn user_id]
+
+ad_require_permission $version_id "read"
+
+cr_write_content -revision_id $version_id