Index: openacs-4/packages/download/www/admin/repository-ae-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/download/www/admin/repository-ae-postgresql.xql 10 May 2001 20:51:30 -0000 1.1
+++ openacs-4/packages/download/www/admin/repository-ae-postgresql.xql 11 May 2001 05:20:45 -0000 1.2
@@ -5,34 +5,38 @@
- FIX ME PLSQL
+ begin;
+ select download_rep__new(
+ :repository_id,
+ :title,
+ :description,
+ :help_text,
+ now(),
+ :user_id,
+ :package_id,
+ :package_id,
+ null
+ );
- declare
- the_id integer;
- begin
- the_id := download_rep__new(repository_id => :repository_id,
- title => :title,
- description => :description,
- help_text => :help_text,
- creation_user => :user_id,
- parent_id => :package_id,
- context_id => :package_id);
- end;
+ end;
-
- begin
- download_rep__edit(repository_id => :repository_id,
- title => :title,
- description => :description,
- help_text => :help_text,
- modifying_user => :user_id
+ begin;
+ select download_rep__edit(
+ :repository_id,
+ :title,
+ :description,
+ :help_text,
+ now(),
+ :user_id,
+ null
);
+
end;