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 -r1.4 -r1.5
--- openacs-4/packages/news/www/admin/approve-2.tcl	24 Feb 2005 13:33:23 -0000	1.4
+++ openacs-4/packages/news/www/admin/approve-2.tcl	30 Sep 2013 10:51:35 -0000	1.5
@@ -23,7 +23,7 @@
 
 set publish_date_ansi $publish_date(date)
 
-if {[string equal $permanent_p "t"]} {
+if {$permanent_p eq "t"} {
 
     set archive_date_ansi [db_null]