Index: dotlrn_packages/lams2int/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/dotlrn_packages/lams2int/www/admin/index.tcl,v diff -u -r1.1 -r1.2 --- dotlrn_packages/lams2int/www/admin/index.tcl 12 Sep 2007 06:37:02 -0000 1.1 +++ dotlrn_packages/lams2int/www/admin/index.tcl 6 Aug 2008 08:00:34 -0000 1.2 @@ -6,7 +6,7 @@ @author Ernie Ghiglione (ErnieG@melcoe.mq.edu.au) @creation-date 2007-04-17 - @cvs-id $Id$ + @cvs-id index.tcl,v 1.1 2007/09/12 06:37:02 ernieg Exp } { } -properties { @@ -28,10 +28,12 @@ set requestSrc [lams2int::get_request_source] set notifyCloseURL "[ad_url][util_get_current_url]" -set hashauthor [lams2int::ws::generate_hash -datetime $datetime -username $username -method "author"] +set course_url "[ad_url][dotlrn_community::get_community_url $course_id]" +set hashauthor [lams2int::ws::generate_hash -datetime $datetime -username $username -method "author"] + template::list::create \ -name d_lesson \ -multirow d_lesson \