Index: openacs-4/packages/imsld/www/imsld-tree.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/imsld-tree.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/imsld/www/imsld-tree.tcl	19 Feb 2009 13:07:26 -0000	1.20
+++ openacs-4/packages/imsld/www/imsld-tree.tcl	4 Nov 2009 17:09:23 -0000	1.21
@@ -112,7 +112,7 @@
         $aux_dom_root setAttribute class "mktree"
         set aux_title_node [$aux_doc createElement li]
         $aux_title_node setAttribute class "liOpen"
-        set text [$doc createTextNode "[_ imsld.Extra_Activities]"] 
+        set text [$aux_doc createTextNode "[_ imsld.Extra_Activities]"] 
         $aux_title_node appendChild $text
         $aux_dom_root appendChild $aux_title_node
         
@@ -125,6 +125,8 @@
         $aux_title_node appendChild $aux_activities_node
         
         set aux_html_tree [$aux_dom_root asXML]
+
+	$aux_doc delete
     } else {
         set aux_html_tree ""
     }