Index: openacs-4/packages/lors-central/www/course-associate.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/www/course-associate.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/lors-central/www/course-associate.tcl	31 May 2005 22:57:22 -0000	1.2
+++ openacs-4/packages/lors-central/www/course-associate.tcl	22 Jan 2007 08:09:25 -0000	1.3
@@ -23,6 +23,12 @@
 set man_id [content::item::get_live_revision -item_id $item_id]
 
 foreach community_id $object_id {
+
+    # We first have to make sure that we install the lorsm portlet.
+    if {![db_string lorsm_applet_p "" -default 0]} {
+	dotlrn_community::add_applet_to_community $community_id "dotlrn_lorsm"
+    }
+
     # Here we associate the course with every community_id that was checked
     lors_central::add_relation -item_id $item_id -community_id $community_id -class_key $type
 
@@ -41,8 +47,8 @@
 
 
 if { [empty_string_p $return_url] } {
-    ad_progress_bar_end -url "course-dotlrn-assoc?item_id=$item_id"
-} else {
-    ad_progress_bar_end -url $return_url
+    set return_url [export_vars -base one-course-associations {man_id}]
 }
 
+ad_progress_bar_end -url $return_url
+