Index: dotlrn_packages/lams2int/www/admin/index.tcl =================================================================== diff -u -r303dd52bf511ddb6154b7b9607e411e85f751f67 -rd7829ccc9a2879fed9b7f9298c0e63f1009a21d0 --- dotlrn_packages/lams2int/www/admin/index.tcl (.../index.tcl) (revision 303dd52bf511ddb6154b7b9607e411e85f751f67) +++ dotlrn_packages/lams2int/www/admin/index.tcl (.../index.tcl) (revision d7829ccc9a2879fed9b7f9298c0e63f1009a21d0) @@ -6,7 +6,7 @@ @author Ernie Ghiglione (ErnieG@melcoe.mq.edu.au) @creation-date 2007-04-17 - @cvs-id index.tcl,v 1.1 2007/09/12 06:37:02 ernieg Exp + @cvs-id $Id$ } { } -properties { @@ -25,12 +25,12 @@ set datetime [lams2int::get_datetime] set server_id [lams2int::get_server_id] set course_id [dotlrn_community::get_community_id] -set requestSrc [lams2int::get_request_source] +set requestSrc "[ad_urlencode [lams2int::get_request_source]]" set notifyCloseURL "[ad_url][util_get_current_url]" set course_url "[ad_url][dotlrn_community::get_community_url $course_id]" +set course_name "[ad_urlencode [dotlrn_community::get_community_name $course_id]]" - set hashauthor [lams2int::ws::generate_hash -datetime $datetime -username $username -method "author"]