Index: openacs-4/packages/imsld/www/admin/monitor/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/monitor/index.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/imsld/www/admin/monitor/index.tcl	21 Dec 2006 15:20:47 -0000	1.1
+++ openacs-4/packages/imsld/www/admin/monitor/index.tcl	17 Apr 2008 17:17:54 -0000	1.2
@@ -14,4 +14,9 @@
 } -errors {
 }
 
-set course_name ""
+set course_name "[db_string run_name {
+	select obj.title 
+        from acs_objects obj, imsld_runs ir
+	where obj.object_id = ir.imsld_id
+        and ir.run_id = :run_id}]"
+