Index: openacs-4/packages/download/www/admin/repository-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/download/www/admin/repository-ae.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/download/www/admin/repository-ae.tcl	14 May 2001 20:31:42 -0000	1.2
@@ -41,7 +41,7 @@
     form get_values ae_repository
     set edit_p [db_string rep_count_get "select count(*) from download_repository_obj where repository_id = :repository_id"]
     if { $edit_p == "0" } {
-        db_dml todo_insert {
+        db_exec_plsql todo_insert {
          declare
           the_id integer;
          begin
@@ -55,7 +55,7 @@
                     end;
         }
     } else {
-        db_dml repository_edit {
+        db_exec_plsql repository_edit {
              begin
                 download_rep.edit(repository_id  => :repository_id,
                                          title => :title,