Index: openacs-4/packages/download/www/download-verify.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/download-verify.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/download/www/download-verify.tcl	21 Oct 2024 12:27:03 -0000	1.12
+++ openacs-4/packages/download/www/download-verify.tcl	21 Oct 2024 12:41:14 -0000	1.13
@@ -44,10 +44,11 @@
 ##TODO Get version name
 set action "[ad_conn package_url]download/$file_name"
 
-set option_list "\{\"\" \"[_ download.Other]\"\}"
+db_multirow reasons get_reasons {
+    select reason, download_reason_id
+    from download_reasons
+    where repository_id = :repository_id
+}
 
-set reason_widget [ad_db_select_widget -option_list $option_list reasons "
-    select reason, download_reason_id from download_reasons where repository_id = $repository_id" reason_id]
-
 set download_id [db_nextval download_reasons_sequence]
 ad_return_template