Index: openacs-4/packages/assessment/lib/user-assessment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/user-assessment.tcl,v diff -u -r1.3.10.1 -r1.3.10.2 --- openacs-4/packages/assessment/lib/user-assessment.tcl 10 Sep 2015 08:27:55 -0000 1.3.10.1 +++ openacs-4/packages/assessment/lib/user-assessment.tcl 18 Sep 2015 08:04:11 -0000 1.3.10.2 @@ -25,13 +25,13 @@ -elements { title { label {[_ assessment.Assessment] ($community_name)} - link_url_eval {[site_node::get_url_from_object_id -object_id $package_id]assessment?[export_vars {assessment_id}]} + link_url_eval {[site_node::get_url_from_object_id -object_id $package_id][export_vars -base assessment {assessment_id}]} link_html { title {description} } } session { label {[_ assessment.Sessions]} - link_url_eval {[site_node::get_url_from_object_id -object_id $package_id]last-session?[export_vars {assessment_id}]} + link_url_eval {[site_node::get_url_from_object_id -object_id $package_id][export_vars -base last-session {assessment_id}]} } } \ -main_class { Index: openacs-4/packages/assessment/www/last-session.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/last-session.tcl,v diff -u -r1.6.2.1 -r1.6.2.2 --- openacs-4/packages/assessment/www/last-session.tcl 10 Sep 2015 08:28:01 -0000 1.6.2.1 +++ openacs-4/packages/assessment/www/last-session.tcl 18 Sep 2015 08:04:11 -0000 1.6.2.2 @@ -61,7 +61,7 @@ } other_sessions { label {[_ assessment.Other_Sessions]} - link_url_eval {[site_node::get_url_from_object_id -object_id $package_id]sessions?[export_vars {assessment_id subject_id}]} + link_url_eval {[site_node::get_url_from_object_id -object_id $package_id][export_vars -base sessions {assessment_id subject_id}]} } } -main_class { narrow @@ -95,7 +95,7 @@ } other_sessions { label {[_ assessment.Other_Sessions]} - link_url_eval {[site_node::get_url_from_object_id -object_id $package_id]sessions?[export_vars {assessment_id subject_id}]} + link_url_eval {[site_node::get_url_from_object_id -object_id $package_id][export_vars -base sessions {assessment_id subject_id}]} } } \ -main_class { Index: openacs-4/packages/rss-support/www/subscr-ae-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/www/subscr-ae-2.tcl,v diff -u -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/rss-support/www/subscr-ae-2.tcl 12 Sep 2015 19:00:44 -0000 1.5.2.1 +++ openacs-4/packages/rss-support/www/subscr-ae-2.tcl 18 Sep 2015 08:00:07 -0000 1.5.2.2 @@ -34,7 +34,7 @@ } -set review_url subscr-ae?[export_vars -url {subscr_id impl_id summary_context_id return_url meta}] +set review_url [export_vars -base subscr-ae {subscr_id impl_id summary_context_id return_url meta}] set context [list [list $review_url "Edit subscription"] "Done"]