Index: openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl	29 Oct 2009 11:09:59 -0000	1.27
+++ openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl	4 Nov 2009 17:09:22 -0000	1.28
@@ -32,6 +32,7 @@
         dom parse $condition_xml document
         $document documentElement condition
         imsld::condition::execute -run_id $run_id -condition $condition -user_id $user_id
+	$document delete
     }
 }
 
@@ -93,6 +94,7 @@
         dom parse $condition_xml document
         $document documentElement condition_node
         imsld::condition::execute -run_id $run_id -condition $condition_node
+	$document delete
     }
 }
 
@@ -129,6 +131,7 @@
             break
         }
     }
+    $document delete
 
     # 3. if the expression is true for all of the users, mark the rererencer act as completed
     db_1row get_context_info {
@@ -194,6 +197,7 @@
         ns_log Notice "eval_change_property_value with user_id: $user_id"
         imsld::statement::execute -run_id $run_id -statement [$change_property_value_root childNodes] -user_id $user_id
     }
+    $document delete
 }
 
 ad_proc -public imsld::condition::eval_when_prop_value_is_set {
@@ -249,6 +253,7 @@
         # there is no associated value, the activity is completed
         set equal_value_p 1
     }
+    $document delete
     
     if { $equal_value_p } {
         # the values are the same, mark the referenced activity as completed