Index: openacs-4/packages/forums/www/forum-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/forum-view.tcl,v
diff -u -N -r1.33 -r1.34
--- openacs-4/packages/forums/www/forum-view.tcl	28 Apr 2009 16:38:59 -0000	1.33
+++ openacs-4/packages/forums/www/forum-view.tcl	27 Oct 2014 16:41:37 -0000	1.34
@@ -7,10 +7,10 @@
     @cvs-id $Id$
 
 } -query {
-    forum_id:integer,notnull
+    forum_id:naturalnum,notnull
     {orderby "last_child_post,desc"}
 		{flush_p 0}
-    page:optional
+    page:naturalnum,optional
 }
 
 
@@ -24,7 +24,7 @@
 }
 
 # If disabled!
-if {$forum(enabled_p) ne "t"} {
+if {$forum(enabled_p) != "t"} {
     ad_returnredirect "./"
     ad_script_abort
 }