Index: openacs-4/packages/news/www/preview.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/preview.tcl,v
diff -u -r1.38.2.2 -r1.38.2.3
--- openacs-4/packages/news/www/preview.tcl	8 Mar 2022 09:00:44 -0000	1.38.2.2
+++ openacs-4/packages/news/www/preview.tcl	8 Mar 2022 09:05:03 -0000	1.38.2.3
@@ -30,10 +30,10 @@
 } -validate {
 
     check_revision_log -requires {action revision_log} {
-	if { $action eq "News Item" && $revision_log eq ""} {
-	    ad_complain "[_ news.lt_You_must_supply_a_rev]"
-	    return
-	}
+        if { $action eq "News Item" && $revision_log eq ""} {
+            ad_complain "[_ news.lt_You_must_supply_a_rev]"
+            return
+        }
     }
 
 }  -properties {
@@ -96,14 +96,14 @@
 if { $news_admin_p || [parameter::get -parameter ApprovalPolicy] eq "open" } {
 
     if { [info exists publish_date(year)] && [info exists publish_date(month)] && [info exists publish_date(day)] } {
-	set publish_date_ansi "$publish_date(year)-$publish_date(month)-$publish_date(day)"
+        set publish_date_ansi "$publish_date(year)-$publish_date(month)-$publish_date(day)"
     } else {
-	set publish_date_ansi ""
+        set publish_date_ansi ""
     }
     if { [info exists archive_date(year)] && [info exists archive_date(month)] && [info exists archive_date(day)] } {
-	set archive_date_ansi "$archive_date(year)-$archive_date(month)-$archive_date(day)"
+        set archive_date_ansi "$archive_date(year)-$archive_date(month)-$archive_date(day)"
     } else {
-	set archive_date_ansi ""
+        set archive_date_ansi ""
     }
 
     if { ![template::util::date::validate $publish_date_ansi ""] } {
@@ -114,10 +114,10 @@
     }
 
     if { [dt_interval_check $archive_date_ansi $publish_date_ansi] >= 0 } {
-	ad_return_error \
+        ad_return_error \
             [_ news.Scheduling_Error] \
             [_ news.lt_The_archive_date_must]
-	ad_script_abort
+        ad_script_abort
     }
 }