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 -N -r1.6 -r1.7
--- openacs-4/packages/news/www/admin/process-2.tcl	1 Oct 2017 12:09:46 -0000	1.6
+++ openacs-4/packages/news/www/admin/process-2.tcl	15 Nov 2017 14:25:36 -0000	1.7
@@ -29,7 +29,7 @@
     }
     
     "archive now" {
-	set when [db_string archive_now {}]
+	set when [clock format [clock seconds] -format %Y-%m-%d]
 	news_items_archive $n_items $when
     }
     
@@ -51,94 +51,6 @@
 
 ad_returnredirect ""
 
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4