Index: openacs-4/packages/news/tcl/news-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/tcl/news-procs-oracle.xql,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/news/tcl/news-procs-oracle.xql 10 Jul 2018 13:48:19 -0000 1.8
+++ openacs-4/packages/news/tcl/news-procs-oracle.xql 5 Oct 2021 10:19:17 -0000 1.8.2.1
@@ -3,37 +3,37 @@
oracle8.1.6
-
+
-
+
begin
news.archive(
item_id => :id,
archive_date => :when);
end;
-
+
-
-
+
+
-
+
begin
news.make_permanent(:id);
end;
-
+
-
-
+
+
-
+
begin
news.del(:id);
end;
-
+
@@ -61,5 +61,5 @@
) where rownum <= $limit
-
+
Index: openacs-4/packages/news/tcl/news-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/tcl/news-procs-postgresql.xql,v
diff -u -r1.7 -r1.7.2.1
--- openacs-4/packages/news/tcl/news-procs-postgresql.xql 10 Jul 2018 13:48:19 -0000 1.7
+++ openacs-4/packages/news/tcl/news-procs-postgresql.xql 5 Oct 2021 10:19:17 -0000 1.7.2.1
@@ -3,32 +3,32 @@
postgresql7.1
-
+
select news__archive(
:id, -- item_id
:when -- archive_date
);
-
+
-
-
+
+
select news__make_permanent(:id);
-
+
-
-
+
+
select news__delete(:id);
-
+
@@ -55,5 +55,5 @@
limit $limit
-
+