Index: openacs-4/packages/imsld/lib/activity.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/lib/activity.tcl,v
diff -u -N -r1.5.2.1 -r1.5.2.2
--- openacs-4/packages/imsld/lib/activity.tcl	28 Jul 2009 19:52:33 -0000	1.5.2.1
+++ openacs-4/packages/imsld/lib/activity.tcl	11 Aug 2009 12:28:52 -0000	1.5.2.2
@@ -151,7 +151,7 @@
 			and attr.run_id = :run_id
 			and attr.user_id = :user_id
 			and attr.type = 'isvisible'
-		    } -default 0]
+		    } -default "t"]
 		} else {
 		    set visible_p t
 		}
@@ -162,19 +162,6 @@
 		
 	    }
 
-# 	    set nested_list [imsld::generate_structure_activities_list -imsld_id $imsld_id \
-# 				 -run_id $run_id \
-# 				 -structure_item_id $structure_item_id \
-# 				 -user_id $user_id \
-# 				 -next_activity_id_list $next_activity_id_list \
-# 				 -role_part_id $role_part_id \
-# 				 -play_id $play_id \
-# 				 -act_id $act_id \
-# 				 -dom_doc $dom_doc \
-# 				 -dom_node $dom_node]
-# 	    # the nested finished activities are returned as a tcl list in tDOM format
-# 	    $structure_node appendFromList [list ul [list] [concat [list] $nested_list]]
-# 	    $dom_node appendChild $structure_node
 	}
     }
 }