Index: openacs-4/packages/download/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index.adp,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/download/www/index.adp	11 Oct 2017 12:04:41 -0000	1.18
+++ openacs-4/packages/download/www/index.adp	17 Oct 2024 11:49:15 -0000	1.19
@@ -26,7 +26,7 @@
 <h3 style="margin-top: 1em">#download.lt_Upload_a_New_Version_#</h3>
 <ul>
 <multiple name=types>
-  <li><a href="@archive_add_url;noi18n@">@types.pretty_name@</a></li>
+  <li><a href="@types.archive_add_url;noi18n@">@types.pretty_name@</a></li>
 </multiple>
 </ul>
 </if>
Index: openacs-4/packages/download/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/download/www/index.tcl	9 Sep 2015 09:10:49 -0000	1.23
+++ openacs-4/packages/download/www/index.tcl	17 Oct 2024 11:49:15 -0000	1.24
@@ -176,8 +176,10 @@
 
 set dimensional_html [ad_dimensional $dimensional]
 
-db_multirow types types_select {
+db_multirow -extend archive_add_url types types_select {
     select archive_type_id, pretty_name, description from download_archive_types where repository_id = :repository_id
+} {
+    set archive_add_url [export_vars -base archive-add {repository_id archive_type_id}]
 }
 
 db_multirow my_revisions my_revisions {
@@ -195,6 +197,4 @@
     order by creation_date
 }
 
-set archive_add_url [export_vars -base archive-add {repository_id archive_type_id}]
-
 ad_return_template