Index: openacs-4/packages/bookmarks/www/bookmark-add-one-2-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bookmarks/www/bookmark-add-one-2-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bookmarks/www/bookmark-add-one-2-postgresql.xql 19 Jul 2001 15:15:26 -0000 1.1
+++ openacs-4/packages/bookmarks/www/bookmark-add-one-2-postgresql.xql 27 Sep 2001 01:37:50 -0000 1.2
@@ -5,10 +5,8 @@
- declare
- v_url_id integer;
- begin
- v_url_id := url__new (
+
+ select url__new (
:url_id,
:url_title,
:host_url,
@@ -19,17 +17,16 @@
:creation_ip,
null
);
- return v_url_id;
- end;
+
-begin
- perform bookmark__new (
+
+ select bookmark__new (
:bookmark_id,
:viewed_user_id,
:url_id,
@@ -40,8 +37,7 @@
:user_id,
:creation_ip,
null);
- return '';
-end;
+