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.5 -r1.6
--- openacs-4/packages/news/www/admin/approve-2.tcl	30 Sep 2013 10:51:35 -0000	1.5
+++ openacs-4/packages/news/www/admin/approve-2.tcl	27 Oct 2014 16:41:48 -0000	1.6
@@ -11,7 +11,7 @@
     @cvs-id $Id$
 
 } { 
-    revision_id:notnull
+    revision_id:naturalnum,notnull
     {return_url: ""}
     {permanent_p: "f"}
     {publish_date:array,date ""}
@@ -23,7 +23,7 @@
 
 set publish_date_ansi $publish_date(date)
 
-if {$permanent_p eq "t"} {
+if {$permanent_p == "t"} {
 
     set archive_date_ansi [db_null]