Index: openacs-4/packages/simulation/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/index.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/simulation/www/index.tcl	12 Mar 2004 12:07:20 -0000	1.14
+++ openacs-4/packages/simulation/www/index.tcl	16 Mar 2004 15:43:41 -0000	1.15
@@ -11,6 +11,8 @@
 set context ""
 set user_id [auth::get_user_id]
 
+set login_url [ad_get_login_url -return]
+
 set citybuild_p [permission::permission_p -object_id $package_id -privilege sim_object_create]
 set simbuild_p [permission::permission_p -object_id $package_id -privilege sim_template_read]
 set siminst_p [permission::permission_p -object_id $package_id -privilege sim_inst]