Index: openacs-4/packages/news/www/admin/approve-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/approve-2.tcl,v
diff -u -N -r1.9 -r1.9.2.1
--- openacs-4/packages/news/www/admin/approve-2.tcl	2 Feb 2018 00:17:02 -0000	1.9
+++ openacs-4/packages/news/www/admin/approve-2.tcl	14 Feb 2019 16:15:01 -0000	1.9.2.1
@@ -5,12 +5,12 @@
     This page makes the insert of publish_date and archive_date (optionally)
     into cr_revisions and cr_news(news_id) resp. without intermediate confirmation.
     The administrator is redirected to return_url:localurl
-  
+
     @author stefan@arsdigita.com
     @creation-date 2000-12-20
     @cvs-id $Id$
 
-} { 
+} {
     revision_id:naturalnum,notnull
     {return_url:localurl ""}
     {permanent_p:boolean "f"}
@@ -25,17 +25,17 @@
 
 if {$permanent_p == "t"} {
 
-    set archive_date_ansi [db_null]
+    set archive_date_ansi ""
 
 } else {
 
     set archive_date_ansi $archive_date(date)
 
     if { [dt_interval_check $archive_date_ansi $publish_date_ansi] >= 0 } {
-	ad_return_error "[_ news.Scheduling_Error]" \
-		"[_ news.lt_The_archive_date_must]"
+        ad_return_error "[_ news.Scheduling_Error]" \
+            "[_ news.lt_The_archive_date_must]"
         ad_script_abort
-    }                     
+    }
 
 }
 
@@ -46,9 +46,9 @@
 
 
 foreach id $revision_id {
-    
-    db_exec_plsql news_item_approve_publish {}       
 
+    db_exec_plsql news_item_approve_publish {}
+
 }
 set package_id [ad_conn package_id]
 if {[rss_support::subscription_exists \