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.43 -r1.44 --- openacs-4/packages/imsld/tcl/imsld-procs.tcl 22 Mar 2006 17:00:34 -0000 1.43 +++ openacs-4/packages/imsld/tcl/imsld-procs.tcl 22 Mar 2006 17:36:04 -0000 1.44 @@ -1989,6 +1989,7 @@ set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {activity_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $activity_node appendChild $a_node @@ -1998,6 +1999,7 @@ set a_node [$dom_doc createElement a] $a_node setAttribute href "finish-component-element-${imsld_id}-${role_part_id}-${activity_id}-learning.imsld" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "(finish)"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2021,6 +2023,7 @@ $activity_node setAttribute class "liOpen" set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {activity_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2030,6 +2033,7 @@ set a_node [$dom_doc createElement a] $a_node setAttribute href "finish-component-element-${imsld_id}-${role_part_id}-${activity_id}-support.imsld" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "(finish)"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2053,6 +2057,7 @@ $structure_node setAttribute class "liOpen" set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {structure_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $structure_node appendChild $a_node @@ -2106,6 +2111,7 @@ $activity_node setAttribute class "liOpen" set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {activity_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2115,6 +2121,7 @@ set a_node [$dom_doc createElement a] $a_node setAttribute href "finish-component-element-${imsld_id}-${role_part_id}-${activity_id}-learning.imsld" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "(finish)"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2133,6 +2140,7 @@ $activity_node setAttribute class "liOpen" set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {activity_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2142,6 +2150,7 @@ set a_node [$dom_doc createElement a] $a_node setAttribute href "finish-component-element-${imsld_id}-${role_part_id}-${activity_id}-support.imsld" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "(finish)"] $a_node appendChild $text $activity_node appendChild $a_node @@ -2167,6 +2176,7 @@ $structure_node setAttribute class "liOpen" set a_node [$dom_doc createElement a] $a_node setAttribute href "[export_vars -base "activity-frame" -url {structure_id}]" + $a_node setAttribute target "content" set text [$dom_doc createTextNode "$activity_title"] $a_node appendChild $text $structure_node appendChild $a_node