Index: openacs-4/packages/news/www/admin/process-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/process-2.tcl,v
diff -u -r1.4.22.1 -r1.4.22.2
--- openacs-4/packages/news/www/admin/process-2.tcl	12 Sep 2015 11:06:43 -0000	1.4.22.1
+++ openacs-4/packages/news/www/admin/process-2.tcl	2 Jan 2016 20:34:50 -0000	1.4.22.2
@@ -29,17 +29,17 @@
     }
     
     "archive now" {
-	set when [db_string archive_now "select sysdate from dual"]
+	set when [db_string archive_now {}]
 	news_items_archive $n_items $when
     }
     
     "archive next week" {
-	set when [db_string archive_next_week "select next_day(sysdate,'Monday') from dual"]
+	set when [db_string archive_next_week {}]
 	news_items_archive $n_items $when
     }
 
     "archive next month" {
-	set when [db_string archive_next_month "select last_day(sysdate)+1 from dual"]
+	set when [db_string archive_next_month {}]
 	news_items_archive $n_items $when
     }