Index: openacs-4/packages/download/sql/oracle/download-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/sql/oracle/download-create.sql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/download/sql/oracle/download-create.sql	23 May 2001 18:44:13 -0000	1.3
+++ openacs-4/packages/download/sql/oracle/download-create.sql	21 Oct 2024 13:01:17 -0000	1.4
@@ -18,9 +18,9 @@
 --
 create table download_repository (
        repository_id integer
-                     constraint download_repository_id_fk
+                     constraint download::repository_id_fk
                      references cr_items (item_id) on delete cascade
-                     constraint download_repository_id_pk 
+                     constraint download::repository_id_pk 
 					 primary key
 );
 
Index: openacs-4/packages/download/sql/postgresql/download-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/sql/postgresql/download-create.sql,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/download/sql/postgresql/download-create.sql	30 Apr 2016 09:40:15 -0000	1.11
+++ openacs-4/packages/download/sql/postgresql/download-create.sql	21 Oct 2024 13:01:17 -0000	1.12
@@ -27,9 +27,9 @@
 --
 create table download_repository (
        repository_id integer
-                     constraint download_repository_id_fk
+                     constraint download::repository_id_fk
                      references cr_items (item_id) on delete cascade
-                     constraint download_repository_id_pk primary key
+                     constraint download::repository_id_pk primary key
 );
 
 select content_type__create_type (
Index: openacs-4/packages/download/tcl/download-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs-oracle.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/download/tcl/download-procs-oracle.xql	31 Oct 2001 20:42:07 -0000	1.4
+++ openacs-4/packages/download/tcl/download-procs-oracle.xql	21 Oct 2024 13:01:17 -0000	1.5
@@ -3,7 +3,7 @@
 <queryset>
    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="download_file_downloader.download_insert">      
+<fullquery name="download::file_downloader.download_insert">      
       <querytext>
       
                 insert into download_downloads (
@@ -30,7 +30,7 @@
       </querytext>
 </fullquery>
  
-<fullquery name="download_insert_revision.revision_new">      
+<fullquery name="download::insert_revision.revision_new">      
       <querytext>
       
         declare
@@ -54,7 +54,7 @@
 </fullquery>
 
  
-<fullquery name="download_insert_revision.content_add">      
+<fullquery name="download::insert_revision.content_add">      
       <querytext>
       
         update cr_revisions
@@ -66,7 +66,7 @@
 </fullquery>
 
  
-<fullquery name="download_insert_revision.make_live">      
+<fullquery name="download::insert_revision.make_live">      
       <querytext>
       
         begin
Index: openacs-4/packages/download/tcl/download-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs-postgresql.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/download/tcl/download-procs-postgresql.xql	31 Oct 2001 20:42:07 -0000	1.6
+++ openacs-4/packages/download/tcl/download-procs-postgresql.xql	21 Oct 2024 13:01:17 -0000	1.7
@@ -3,7 +3,7 @@
 <queryset>
    <rdbms><type>postgresql</type><version>7.1</version></rdbms>
 
-<fullquery name="download_file_downloader.download_insert">      
+<fullquery name="download::file_downloader.download_insert">      
 <querytext>
 
 insert into download_downloads (
@@ -30,7 +30,7 @@
 </querytext>
 </fullquery>
 
-<fullquery name="download_insert_revision.revision_new">      
+<fullquery name="download::insert_revision.revision_new">      
 <querytext>
 
 declare
@@ -63,7 +63,7 @@
 
 
  
-<fullquery name="download_insert_revision.content_add">      
+<fullquery name="download::insert_revision.content_add">      
 <querytext>
 
 update cr_revisions
@@ -75,7 +75,7 @@
 
 
  
-<fullquery name="download_insert_revision.make_live">      
+<fullquery name="download::insert_revision.make_live">      
 <querytext>
 
 select content_item__set_live_revision( :revision_id );
Index: openacs-4/packages/download/tcl/download-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/download/tcl/download-procs.tcl	21 Oct 2024 12:14:38 -0000	1.23
+++ openacs-4/packages/download/tcl/download-procs.tcl	21 Oct 2024 13:01:17 -0000	1.24
@@ -6,10 +6,16 @@
     @cvs-id $Id$
 }
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Tue Dec 12 15:14:13 2000
-ad_proc download_repository_info { {package_id ""} {do_redirect 1}} {
+namespace eval download {}
+
+ad_proc download::repository_info {
+    {package_id ""}
+    {do_redirect 1}
+} {
     Get information about the repository mounted for package_id.
+
+    @author jbank@arsdigita.com [jbank@arsdigita.com]
+    @creation-date Tue Dec 12 15:14:13 2000
 } {
     if {$package_id eq ""} {
         set package_id [ad_conn package_id]
@@ -48,18 +54,27 @@
     return [array get repository]
 }
 
-ad_proc download_repository_id { {package_id ""} {do_redirect 1}} {
+ad_proc download::repository_id {
+    {package_id ""}
+    {do_redirect 1}
+} {
     Get repository_id mounted for package_id.
 } {
-    array set repository [download_repository_info $package_id $do_redirect]
+    array set repository [download::repository_info $package_id $do_redirect]
     return $repository(repository_id)
 }
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Tue Dec 12 17:52:07 2000
-ad_proc download_metadata_widget { data_type name metadata_id {user_value ""}} {
-    Return a widget to take input of the given data_type
+ad_proc download::metadata_widget {
+    data_type
+    name
+    metadata_id
+    {user_value ""}
 } {
+    Return a widget to take input of the given data_type.
+
+    @author jbank@arsdigita.com
+    @creation-date Tue Dec 12 17:52:07 2000
+} {
     set html ""
     set element_name "metadata.$metadata_id"
     switch -- $data_type {
@@ -115,7 +130,7 @@
             </tr>"
 }
 
-ad_proc download_file_downloader {
+ad_proc download::file_downloader {
 } {
     Sends the requested file to the user.  Note that the path has the
     original file name, so the browser will have a sensible name if you
@@ -131,7 +146,7 @@
         { reason_other ""}
     }
 
-    ns_log Debug "download_file_downloader: downloading $revision_id"
+    ns_log Debug "download::file_downloader: downloading $revision_id"
 
     set user_id [ad_conn user_id]
     set download_ip [ad_conn peeraddr]
@@ -195,9 +210,10 @@
     return filter_return
 }
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Fri Dec 15 14:07:02 2000
-ad_proc download_metadata_column { data_type } { Dummy comment.} {
+ad_proc download::metadata_column { data_type } {
+    @author jbank@arsdigita.com [jbank@arsdigita.com]
+    @creation-date Fri Dec 15 14:07:02 2000
+} {
     switch -- $data_type {
         date { set answer_column "date_answer" }
         boolean { set answer_column "boolean_answer" }
@@ -213,10 +229,15 @@
 }
 
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Fri Dec 15 16:14:40 2000
-ad_proc download_validate_metadata { repository_id metadata_info archive_type_id } {
+ad_proc download::validate_metadata {
+    repository_id
+    metadata_info
+    archive_type_id
+} {
     Validate metadata arguments for a given archive_type
+
+    @author jbank@arsdigita.com [jbank@arsdigita.com]
+    @creation-date Fri Dec 15 16:14:40 2000
 } {
     array set metadata $metadata_info
     set metadata_with_missing_responses [list]
@@ -281,10 +302,16 @@
     return [array get metadata]
 }
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Fri Dec 15 16:16:41 2000
-ad_proc download_insert_metadata { repository_id archive_type_id revision_id metadata_array} {
+ad_proc download::insert_metadata {
+    repository_id
+    archive_type_id
+    revision_id
+    metadata_array
+} {
     Do metadata insertion.  Assume within transaction.
+
+    @author jbank@arsdigita.com [jbank@arsdigita.com]
+    @creation-date Fri Dec 15 16:16:41 2000
 } {
     array set metadata $metadata_array
     set metadata_list [db_list_of_lists survsimp_question_info_list {
@@ -303,19 +330,30 @@
         set metadata_id [lindex $metadata_info 0]
         set data_type [lindex $metadata_info 1]
         set response $metadata($metadata_id)
-        set answer_column [download_metadata_column $data_type]
+        set answer_column [download::metadata_column $data_type]
         db_dml metadata_inserts "
          insert into download_revision_data(revision_id, metadata_id, $answer_column)
          values ( :revision_id, :metadata_id, :response )
         "
     }
 }
 
-# @author jbank@arsdigita.com [jbank@arsdigita.com]
-# @creation-date Fri Dec 15 16:20:38 2000
-ad_proc download_insert_revision { upload_file tmpfile repository_id archive_type_id archive_id version_name revision_id user_id creation_ip approved_p metadata_array } {
-    Dummy comment.
+ad_proc download::insert_revision {
+    upload_file
+    tmpfile
+    repository_id
+    archive_type_id
+    archive_id
+    version_name
+    revision_id
+    user_id
+    creation_ip
+    approved_p
+    metadata_array
 } {
+    @author jbank@arsdigita.com [jbank@arsdigita.com]
+    @creation-date Fri Dec 15 16:20:38 2000
+} {
     # get the filename part of the upload file
     if {![regexp {[^//\\]+$} $upload_file filename]} {
         # no match
@@ -359,7 +397,7 @@
         end;
     }
 
-    download_insert_metadata $repository_id $archive_type_id $revision_id $metadata_array
+    download::insert_metadata $repository_id $archive_type_id $revision_id $metadata_array
 }
 
 #
Index: openacs-4/packages/download/tcl/download-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/download/tcl/download-procs.xql	17 May 2003 10:29:27 -0000	1.4
+++ openacs-4/packages/download/tcl/download-procs.xql	21 Oct 2024 13:01:17 -0000	1.5
@@ -2,7 +2,7 @@
 <queryset>
 
 
-<fullquery name="download_repository_info.repository_info">
+<fullquery name="download::repository_info.repository_info">
 <querytext>
 
 select repository_id, title, description, help_text 
@@ -14,7 +14,7 @@
 
  
 
-<fullquery name="download_repository_info.type_info">
+<fullquery name="download::repository_info.type_info">
 <querytext>
 
 select count(*) from download_archive_types 
@@ -25,7 +25,7 @@
 
  
 
-<fullquery name="download_metadata_widget.download_metadata_choices">
+<fullquery name="download::metadata_widget.download_metadata_choices">
 <querytext>
 
 select choice_id, label
@@ -36,7 +36,7 @@
 </querytext>
 </fullquery>
 
-<fullquery name="download_file_downloader.download_count">
+<fullquery name="download::file_downloader.download_count">
 <querytext>
 
 select count(*) from download_downloads 
@@ -45,7 +45,7 @@
 </querytext>
 </fullquery>
 
-<fullquery name="download_validate_metadata.metadata">      
+<fullquery name="download::validate_metadata.metadata">      
 <querytext>
       
 select 
@@ -65,7 +65,7 @@
 
 
  
-<fullquery name="download_insert_metadata.survsimp_question_info_list">      
+<fullquery name="download::insert_metadata.survsimp_question_info_list">      
 <querytext>
       
 select 
@@ -83,7 +83,7 @@
 
  
 
-<fullquery name="download_insert_metadata.metadata_inserts">      
+<fullquery name="download::insert_metadata.metadata_inserts">      
 <querytext>
       
 insert into download_revision_data
Index: openacs-4/packages/download/www/all-metadata.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/all-metadata.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/download/www/all-metadata.tcl	20 Jan 2018 22:42:17 -0000	1.7
+++ openacs-4/packages/download/www/all-metadata.tcl	21 Oct 2024 13:01:17 -0000	1.8
@@ -19,7 +19,7 @@
     ad_return_complaint 1 "Metadata id not found"
     ad_script_abort
 }
-set answer_column [download_metadata_column $data_type]
+set answer_column [download::metadata_column $data_type]
 set metadata_select "metadata$metadata_id"
 
 if {$orderby eq ""} {
Index: openacs-4/packages/download/www/archive-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add-2.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/download/www/archive-add-2.tcl	12 Feb 2019 18:45:14 -0000	1.11
+++ openacs-4/packages/download/www/archive-add-2.tcl	21 Oct 2024 13:01:17 -0000	1.12
@@ -17,8 +17,8 @@
     metadata:array,optional,html
 } -validate {
     check_metadata -requires { archive_type_id } {
-        set repository_id [download_repository_id]
-        array set metadata [download_validate_metadata $repository_id [array get metadata] $archive_type_id]
+        set repository_id [download::repository_id]
+        array set metadata [download::validate_metadata $repository_id [array get metadata] $archive_type_id]
     }
 }
 
@@ -88,7 +88,7 @@
         end;
     }
 
-    download_insert_revision $upload_file ${upload_file.tmpfile} $repository_id \
+    download::insert_revision $upload_file ${upload_file.tmpfile} $repository_id \
         $archive_type_id $archive_id $version_name $revision_id \
         $user_id $creation_ip $approved_p [array get metadata]
 
Index: openacs-4/packages/download/www/archive-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/download/www/archive-add.tcl	6 Aug 2014 16:24:41 -0000	1.6
+++ openacs-4/packages/download/www/archive-add.tcl	21 Oct 2024 13:01:17 -0000	1.7
@@ -13,7 +13,7 @@
 set context {"Add an Archive"}
 set user_id [ad_conn user_id]
 
-array set repository [download_repository_info]
+array set repository [download::repository_info]
 set repository_id $repository(repository_id)
 set title $repository(title)
 set description $repository(description)
@@ -34,7 +34,7 @@
                 dam.archive_type_id is null)
     order by sort_key
 } {
-    append extra_form_elts [download_metadata_widget $data_type $pretty_name $metadata_id]
+    append extra_form_elts [download::metadata_widget $data_type $pretty_name $metadata_id]
 }
 
 ad_return_template
\ No newline at end of file
Index: openacs-4/packages/download/www/archive-version-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add-2.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/download/www/archive-version-add-2.tcl	12 Feb 2019 18:45:14 -0000	1.6
+++ openacs-4/packages/download/www/archive-version-add-2.tcl	21 Oct 2024 13:01:17 -0000	1.7
@@ -14,15 +14,15 @@
 } -validate {
     check_metadata -requires { } {
         set archive_type_id [db_string get_archive_type "select archive_type_id from download_archives where archive_id = :archive_id"]
-        set repository_id [download_repository_id]
-        array set metadata [download_validate_metadata $repository_id [array get metadata] $archive_type_id]
+        set repository_id [download::repository_id]
+        array set metadata [download::validate_metadata $repository_id [array get metadata] $archive_type_id]
     }
 }
 
 ##First, do a download_archive.new
 ##Then do a download_archive_revision.new
 ##Then insert into the download_revision_data
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set user_id [ad_conn user_id]
 set admin_p [permission::permission_p -object_id $repository_id -privilege admin]
 
@@ -40,7 +40,7 @@
 set revision_id [db_nextval acs_object_id_seq]
 
 db_transaction {
-    download_insert_revision $upload_file ${upload_file.tmpfile} $repository_id $archive_type_id $archive_id $version_name $revision_id $user_id $creation_ip $approved_p [array get metadata]
+    download::insert_revision $upload_file ${upload_file.tmpfile} $repository_id $archive_type_id $archive_id $version_name $revision_id $user_id $creation_ip $approved_p [array get metadata]
 }
 
 ad_returnredirect $return_url
Index: openacs-4/packages/download/www/archive-version-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/download/www/archive-version-add.tcl	30 Sep 2013 11:05:49 -0000	1.7
+++ openacs-4/packages/download/www/archive-version-add.tcl	21 Oct 2024 13:01:17 -0000	1.8
@@ -14,7 +14,7 @@
 }
 
 auth::require_login
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 
 permission::require_permission -object_id $archive_id -privilege write
 
@@ -50,7 +50,7 @@
                 dam.archive_type_id is null)
     order by sort_key
 } {
-    append extra_form_elts [download_metadata_widget $data_type $pretty_name $metadata_id]
+    append extra_form_elts [download::metadata_widget $data_type $pretty_name $metadata_id]
 }
 
 set context [list "[_ download.lt_Add_an_Revision_to_ar]"]
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.13 -r1.14
--- openacs-4/packages/download/www/download-verify.tcl	21 Oct 2024 12:41:14 -0000	1.13
+++ openacs-4/packages/download/www/download-verify.tcl	21 Oct 2024 13:01:17 -0000	1.14
@@ -9,7 +9,7 @@
 }
 
 set user_id [ad_conn user_id]
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 
 auth::require_login
 permission::require_permission -object_id $revision_id -privilege "read"
Index: openacs-4/packages/download/www/help.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/help.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/download/www/help.tcl	24 Feb 2005 13:33:11 -0000	1.4
+++ openacs-4/packages/download/www/help.tcl	21 Oct 2024 13:01:17 -0000	1.5
@@ -7,7 +7,7 @@
 } {
 }
 
-array set repository [download_repository_info]
+array set repository [download::repository_info]
 set title $repository(title)
 set help_text $repository(help_text)
 set context [list "[_ download.Help_on_title]"]
Index: openacs-4/packages/download/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/download/www/index.tcl	17 Oct 2024 11:49:15 -0000	1.24
+++ openacs-4/packages/download/www/index.tcl	21 Oct 2024 13:01:17 -0000	1.25
@@ -33,7 +33,7 @@
 set register_url [export_vars -base /register/index {return_url}]
 set user_id [ad_conn user_id]
 
-array set repository [download_repository_info]
+array set repository [download::repository_info]
 set repository_id $repository(repository_id)
 
 set master_admin_p [permission::permission_p -object_id [ad_conn package_id] -privilege admin]
@@ -120,7 +120,7 @@
           (dam.archive_type_id = :archive_type_id or dam.archive_type_id is null)
     order by sort_key
 } {
-    set answer_column [download_metadata_column $data_type]
+    set answer_column [download::metadata_column $data_type]
     set metadata_select "metadata$metadata_id"
     append metadata_selects ", (select $answer_column from download_revision_data where revision_id = dar.revision_id and metadata_id = :metadata_id) as $metadata_select
     "
Index: openacs-4/packages/download/www/one-metadata.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-metadata.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/download/www/one-metadata.tcl	20 Jan 2018 22:42:17 -0000	1.6
+++ openacs-4/packages/download/www/one-metadata.tcl	21 Oct 2024 13:01:17 -0000	1.7
@@ -19,7 +19,7 @@
     ad_return_complaint 1 [_ download.lt_Metadata_id_not_found]
     ad_script_abort
 }
-set answer_column [download_metadata_column $data_type]
+set answer_column [download::metadata_column $data_type]
 
 ##TODO: Add archive types
 db_multirow archives archives "
Index: openacs-4/packages/download/www/one-revision.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-revision.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/download/www/one-revision.tcl	30 Sep 2013 11:05:49 -0000	1.12
+++ openacs-4/packages/download/www/one-revision.tcl	21 Oct 2024 13:01:17 -0000	1.13
@@ -12,7 +12,7 @@
     master_admin_p:onevalue    
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set admin_p [permission::permission_p -object_id $revision_id -privilege "admin"]
 set master_admin_p [permission::permission_p -object_id [ad_conn package_id] -privilege admin]
 
@@ -32,7 +32,7 @@
           (dam.archive_type_id = :archive_type_id or dam.archive_type_id is null)
     order by sort_key
 } {
-    set answer_column [download_metadata_column $data_type]
+    set answer_column [download::metadata_column $data_type]
     set metadata_select "metadata$metadata_id"
     template::multirow append metadata $pretty_name $metadata_select
     append metadata_selects ", (select $answer_column from download_revision_data where revision_id = :revision_id and metadata_id = $metadata_id) as $metadata_select
Index: openacs-4/packages/download/www/admin/approve-or-reject-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-2.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/download/www/admin/approve-or-reject-2.tcl	12 Feb 2019 18:45:14 -0000	1.12
+++ openacs-4/packages/download/www/admin/approve-or-reject-2.tcl	21 Oct 2024 13:01:17 -0000	1.13
@@ -17,7 +17,7 @@
     }
 }
 
-array set repository_info [download_repository_info]
+array set repository_info [download::repository_info]
 
 set repository_id $repository_info(repository_id)
 set user_id [ad_conn user_id]
Index: openacs-4/packages/download/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/download/www/admin/index.tcl	12 Sep 2013 10:26:12 -0000	1.3
+++ openacs-4/packages/download/www/admin/index.tcl	21 Oct 2024 13:01:17 -0000	1.4
@@ -7,7 +7,7 @@
 } {
 }
 
-array set repository [download_repository_info]
+array set repository [download::repository_info]
 set repository_id $repository(repository_id)
 set title $repository(title)
 set description $repository(description)
Index: openacs-4/packages/download/www/admin/report-by-ip.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-by-ip.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/download/www/admin/report-by-ip.tcl	1 Jul 2015 18:41:28 -0000	1.9
+++ openacs-4/packages/download/www/admin/report-by-ip.tcl	21 Oct 2024 13:01:17 -0000	1.10
@@ -14,7 +14,7 @@
     table:onevalue
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 
 set dimensional {
     {downloaded "Download Period" 1m {
Index: openacs-4/packages/download/www/admin/report-by-user.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-by-user.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/download/www/admin/report-by-user.tcl	1 Jul 2015 18:41:29 -0000	1.9
+++ openacs-4/packages/download/www/admin/report-by-user.tcl	21 Oct 2024 13:01:17 -0000	1.10
@@ -14,7 +14,7 @@
     table:onevalue
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 
 set dimensional {
     {downloaded "Download Period" 1m {
Index: openacs-4/packages/download/www/admin/report-one-ip.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-one-ip.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/download/www/admin/report-one-ip.tcl	26 Jun 2015 20:56:07 -0000	1.8
+++ openacs-4/packages/download/www/admin/report-one-ip.tcl	21 Oct 2024 13:01:17 -0000	1.9
@@ -18,7 +18,7 @@
 }
 
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set dimensional {
     {downloaded "Download Period" 1m {
         {1d "last 24hrs" {where "[db_map date_clause_1]"}}
Index: openacs-4/packages/download/www/admin/report-one-user.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-one-user.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/download/www/admin/report-one-user.tcl	26 Jun 2015 20:56:07 -0000	1.9
+++ openacs-4/packages/download/www/admin/report-one-user.tcl	21 Oct 2024 13:01:17 -0000	1.10
@@ -16,7 +16,7 @@
     table:onevalue
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set dimensional {
     {downloaded "Download Period" 1m {
         {1d "last 24hrs" {where "[db_map date_clause_1]"}}
Index: openacs-4/packages/download/www/admin/report-version-downloads.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-version-downloads.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/download/www/admin/report-version-downloads.tcl	26 Jun 2015 20:56:07 -0000	1.9
+++ openacs-4/packages/download/www/admin/report-version-downloads.tcl	21 Oct 2024 13:01:17 -0000	1.10
@@ -19,7 +19,7 @@
     table:onevalue
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 
 permission::require_permission -object_id $archive_id -privilege "admin"
 
Index: openacs-4/packages/download/www/admin/repository-metadata-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/download/www/admin/repository-metadata-delete.tcl	20 Jan 2018 22:42:17 -0000	1.5
+++ openacs-4/packages/download/www/admin/repository-metadata-delete.tcl	21 Oct 2024 13:01:17 -0000	1.6
@@ -8,7 +8,7 @@
     metadata_id:naturalnum,notnull
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 db_dml metadata_delete {
Index: openacs-4/packages/download/www/admin/repository-metadata-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-edit.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/download/www/admin/repository-metadata-edit.tcl	26 May 2017 17:47:04 -0000	1.8
+++ openacs-4/packages/download/www/admin/repository-metadata-edit.tcl	21 Oct 2024 13:01:17 -0000	1.9
@@ -10,7 +10,7 @@
 
 set context [list "Metadata edit"]
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 db_0or1row metadata_select {
Index: openacs-4/packages/download/www/admin/repository-metadata.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/download/www/admin/repository-metadata.tcl	26 May 2017 17:47:04 -0000	1.5
+++ openacs-4/packages/download/www/admin/repository-metadata.tcl	21 Oct 2024 13:01:17 -0000	1.6
@@ -7,7 +7,7 @@
 } {
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set title "Download Repository Metadata"
 set context [list "Metadata"]
 
Index: openacs-4/packages/download/www/admin/repository-reasons-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/download/www/admin/repository-reasons-delete.tcl	20 Jan 2018 22:42:17 -0000	1.5
+++ openacs-4/packages/download/www/admin/repository-reasons-delete.tcl	21 Oct 2024 13:01:17 -0000	1.6
@@ -8,7 +8,7 @@
     download_reason_id:naturalnum,notnull
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 db_dml reason_delete {
Index: openacs-4/packages/download/www/admin/repository-reasons-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-edit.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/download/www/admin/repository-reasons-edit.tcl	6 Aug 2014 16:24:41 -0000	1.7
+++ openacs-4/packages/download/www/admin/repository-reasons-edit.tcl	21 Oct 2024 13:01:17 -0000	1.8
@@ -8,7 +8,7 @@
     download_reason_id:naturalnum,notnull
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set user_id         [ad_conn user_id]
 
 permission::require_permission -object_id $repository_id -privilege "admin"
Index: openacs-4/packages/download/www/admin/repository-reasons.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/download/www/admin/repository-reasons.tcl	12 Sep 2013 10:26:13 -0000	1.4
+++ openacs-4/packages/download/www/admin/repository-reasons.tcl	21 Oct 2024 13:01:17 -0000	1.5
@@ -7,7 +7,7 @@
 } {
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 set title "Download Repository Download Reasons"
Index: openacs-4/packages/download/www/admin/repository-types-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/download/www/admin/repository-types-delete.tcl	20 Jan 2018 22:42:17 -0000	1.5
+++ openacs-4/packages/download/www/admin/repository-types-delete.tcl	21 Oct 2024 13:01:17 -0000	1.6
@@ -8,7 +8,7 @@
     archive_type_id:naturalnum,notnull
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 db_dml type_delete {
Index: openacs-4/packages/download/www/admin/repository-types-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-edit.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/download/www/admin/repository-types-edit.tcl	6 Aug 2014 16:24:42 -0000	1.7
+++ openacs-4/packages/download/www/admin/repository-types-edit.tcl	21 Oct 2024 13:01:17 -0000	1.8
@@ -8,7 +8,7 @@
     archive_type_id:naturalnum,notnull
 }
 
-set repository_id [download_repository_id]
+set repository_id [download::repository_id]
 set user_id         [ad_conn user_id]
 
 permission::require_permission -object_id $repository_id -privilege "admin"
Index: openacs-4/packages/download/www/admin/repository-types.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/download/www/admin/repository-types.tcl	12 Sep 2013 10:26:13 -0000	1.4
+++ openacs-4/packages/download/www/admin/repository-types.tcl	21 Oct 2024 13:01:17 -0000	1.5
@@ -7,7 +7,7 @@
 } {
 }
 
-set repository_id [download_repository_id [ad_conn package_id] 0]
+set repository_id [download::repository_id [ad_conn package_id] 0]
 permission::require_permission -object_id $repository_id -privilege "admin"
 
 set title "Download Repository Archive Types"
Index: openacs-4/packages/download/www/download/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/download/index.vuh,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/download/www/download/index.vuh	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/download/www/download/index.vuh	21 Oct 2024 13:01:17 -0000	1.2
@@ -1 +1 @@
-download_file_downloader
\ No newline at end of file
+download::file_downloader
\ No newline at end of file