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.38.2.4 -r1.38.2.5
--- openacs-4/packages/forums/www/forum-view.tcl	26 Sep 2020 12:10:23 -0000	1.38.2.4
+++ openacs-4/packages/forums/www/forum-view.tcl	15 Jul 2022 16:19:56 -0000	1.38.2.5
@@ -7,27 +7,18 @@
     @cvs-id $Id$
 
 } -query {
-    forum_id:naturalnum,notnull
+    forum_id:object_type(forums_forum)
     {orderby:token,notnull "last_child_post,desc"}
     {flush_p:boolean,notnull 0}
     page:naturalnum,optional,notnull
     page_size:naturalnum,optional,notnull
 }
 
-ad_try {
-    #
-    # Get forum data
-    #
-    forum::get -forum_id $forum_id -array forum
+#
+# Get forum data
+#
+forum::get -forum_id $forum_id -array forum
 
-} trap NOT_FOUND {} {
-    ns_returnnotfound
-    ad_script_abort
-
-} on error {errMsg} {
-    error $errMsg $::errorInfo $::errorCode
-}
-
 # If disabled!
 if {$forum(enabled_p) != "t"} {
     ad_returnredirect "./"