Index: openacs-4/packages/imsld/www/imsld-divset.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/imsld-divset.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/imsld/www/imsld-divset.tcl	5 Jun 2008 17:36:53 -0000	1.1
+++ openacs-4/packages/imsld/www/imsld-divset.tcl	8 Jul 2008 15:32:34 -0000	1.2
@@ -9,9 +9,19 @@
     @cvs-id $Id$
 } {
     run_id:integer,notnull
+    {activity_id:optional ""}
 } -properties {
 } -validate {
 } -errors {
 }
 
 set course_name ""
+
+set environment_src ""
+set content_src ""
+
+if { $activity_id ne ""} {
+    set content_src [export_vars -base "activity-frame" {{run_id $run_id} {activity_id $activity_id}}]
+    set environment_src [export_vars -base "environment-frame" {{run_id $run_id} {activity_id $activity_id}}]
+}
+