Index: dotlrn_packages/lams2int/www/admin/add-2.tcl
===================================================================
diff -u -rafdaca78371f7fbe41c8fa7ab6482af0dbf543df -r303dd52bf511ddb6154b7b9607e411e85f751f67
--- dotlrn_packages/lams2int/www/admin/add-2.tcl	(.../add-2.tcl)	(revision afdaca78371f7fbe41c8fa7ab6482af0dbf543df)
+++ dotlrn_packages/lams2int/www/admin/add-2.tcl	(.../add-2.tcl)	(revision 303dd52bf511ddb6154b7b9607e411e85f751f67)
@@ -26,8 +26,8 @@
 
 # get course data
 set course_id [dotlrn_community::get_community_id]
+set course_url "[ad_url][dotlrn_community::get_community_url $course_id]"
 
-
 # methods
 
 # start, schedule, delete
@@ -36,8 +36,9 @@
 
 set hashSeq [lams2int::ws::generate_hash -datetime $datetime -username $username]
 
-set lesson_url "$lams_server_url/services/xml/LessonManager?method=$method&serverId=$server_id&ldId=$sequence_id&datetime=[ad_urlencode $datetime]&hashValue=$hashSeq&username=$username&courseId=$course_id&title=[ad_urlencode $name]&desc=[ad_urlencode $introduction]&country=AU&lang=en"
+set lesson_url "$lams_server_url/services/xml/LessonManager?method=$method&serverId=$server_id&ldId=$sequence_id&datetime=[ad_urlencode $datetime]&hashValue=$hashSeq&username=$username&courseId=$course_id&title=[ad_urlencode $name]&desc=[ad_urlencode $introduction]&country=AU&lang=en&customCSV=$username,$course_id,$course_url"
 
+ns_log Notice "LESSON_URL: $lesson_url"
 
 set xml [lindex [ad_httpget -url $lesson_url -timeout 30] 1]