Index: openacs-4/packages/simulation/www/simulation-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simulation-master.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/simulation/www/simulation-master.tcl	17 Dec 2003 10:43:06 -0000	1.7
+++ openacs-4/packages/simulation/www/simulation-master.tcl	7 Jan 2004 14:32:48 -0000	1.8
@@ -4,6 +4,15 @@
 set parameters_url [export_vars -base "/shared/parameters" {package_id return_url}]
 set base_url [apm_package_url_from_id $package_id]
 
+# Anonymous users should only be allowed to access the index page (with the flash map)
+# and the object view urls
+# We are assuming here that all pages in the package use this master template
+if { [string equal [ad_conn user_id] 0] } {
+    if { ![regexp "^object/" [ad_conn extra_url]] && ![empty_string_p [ad_conn extra_url]] } {
+        ad_redirect_for_registration
+    }
+}
+
 ######################################################################
 #
 # Build a link bar for the subsite