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?