Index: openacs-4/packages/dotlrn/www/register.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/register.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/dotlrn/www/register.tcl	5 Feb 2008 13:53:08 -0000	1.15
+++ openacs-4/packages/dotlrn/www/register.tcl	29 Sep 2013 13:49:45 -0000	1.16
@@ -83,7 +83,7 @@
             
             set segment_id [db_string select_admin_rel_segment_id {}]
             set community_name [dotlrn_community::get_community_name $community_id]
-            set community_url "[ad_parameter -package_id [ad_acs_kernel_id] SystemURL][dotlrn_community::get_community_url $community_id]"
+            set community_url "[parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL][dotlrn_community::get_community_url $community_id]"
             
             set query [db_map bulk_mail_query]