Index: openacs-4/packages/forums/forums.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/forums.info,v diff -u -r1.13 -r1.13.2.1 --- openacs-4/packages/forums/forums.info 23 Sep 2002 23:32:17 -0000 1.13 +++ openacs-4/packages/forums/forums.info 14 Oct 2002 21:19:58 -0000 1.13.2.1 @@ -78,6 +78,8 @@ + + Index: openacs-4/packages/forums/tcl/forums-security-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/forums-security-procs.tcl,v diff -u -r1.3 -r1.3.2.1 --- openacs-4/packages/forums/tcl/forums-security-procs.tcl 6 Jun 2002 01:04:35 -0000 1.3 +++ openacs-4/packages/forums/tcl/forums-security-procs.tcl 14 Oct 2002 21:20:01 -0000 1.3.2.1 @@ -13,8 +13,12 @@ ad_proc -private do_abort {} { do an abort if security violation } { - ad_returnredirect "not-allowed" - return -code error + if { [ad_conn user_id] == 0 } { + ad_redirect_for_registration + } else { + ad_returnredirect "not-allowed" + } + ad_script_abort } ad_proc -public can_read_forum_p { Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/forums/www/not-allowed.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/forums/www/not-allowed.tcl'. Fisheye: No comparison available. Pass `N' to diff?