Index: openacs-4/packages/imsld/tcl/imsld-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-procs.tcl,v
diff -u -r1.60 -r1.61
--- openacs-4/packages/imsld/tcl/imsld-procs.tcl	24 Apr 2006 11:04:15 -0000	1.60
+++ openacs-4/packages/imsld/tcl/imsld-procs.tcl	24 Apr 2006 11:08:16 -0000	1.61
@@ -3289,7 +3289,7 @@
                     set text [$dom_doc createTextNode " "]
                     $activity_node appendChild $text
                         
-                    if { !$completed_p } {
+                    if { !$completed_activity_p } {
                         set input_node [$dom_doc createElement input]
                         $input_node setAttribute type "checkbox"
                         $input_node setAttribute style "vertical-align: bottom;"
@@ -3325,7 +3325,7 @@
                     set text [$dom_doc createTextNode " "]
                     $activity_node appendChild $text
                     
-                    if { !$completed_p } {
+                    if { !$completed_activity_p } {
                         set input_node [$dom_doc createElement input]
                         $input_node setAttribute type "checkbox"
                         $input_node setAttribute style "vertical-align: bottom;"