Index: openacs-4/packages/news/www/item-create-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create-3.tcl,v
diff -u -r1.22.2.3 -r1.22.2.4
--- openacs-4/packages/news/www/item-create-3.tcl	12 Apr 2021 13:59:42 -0000	1.22.2.3
+++ openacs-4/packages/news/www/item-create-3.tcl	15 Mar 2022 15:56:30 -0000	1.22.2.4
@@ -36,7 +36,7 @@
 #
 # the news_admin or an open approval policy allow immediate publishing
 #
-if { $news_admin_p == 1 || $approval_policy eq "open" } {
+if { $news_admin_p || $approval_policy eq "open" } {
     set approval_user [ad_conn user_id]
     set approval_ip [ad_conn peeraddr]
     set approval_date [dt_sysdate]
@@ -49,7 +49,7 @@
 }
 
 # Allow the user to "never expire" a news item.
-if {$permanent_p == "t"} {
+if {$permanent_p} {
     set archive_date_ansi ""
 }