Index: openacs-4/packages/imsld/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/index.tcl,v diff -u -r1.15 -r1.16 --- openacs-4/packages/imsld/www/admin/index.tcl 29 May 2007 09:12:09 -0000 1.15 +++ openacs-4/packages/imsld/www/admin/index.tcl 30 May 2007 08:36:22 -0000 1.16 @@ -79,11 +79,11 @@ db_multirow -extend { delete_template create_run } imslds get_imslds { *SQL* } { if { [empty_string_p $live_revision] } { - set delete_template "[_ imsld.Deleted] [_ imsld.Make_it_live]" + set delete_template "[_ imsld.Deleted] [_ imsld.Make_it_live]" set create_run "" } else { - set delete_template "\"[_" - set create_run " [_ imsld.create_new_run] " + set delete_template "\"<\#_\">" + set create_run " [_ imsld.create_new_run] " } } @@ -135,31 +135,31 @@ db_multirow -extend { manage delete_template image_path image_alt image_title } imsld_runs get_runs { *SQL* } { - set delete_template "\"[_" + set delete_template "\"[_" switch $status { deleted { - set delete_template "[_ imsld.Deleted] [_ imsld.Make_it_live]" + set delete_template "[_ imsld.Deleted] [_ imsld.Make_it_live]" } active { - set delete_template "\"[_" + set delete_template "\"[_" set image_alt "[_ imsld.active]" set image_title "[_ imsld.active]" set image_path "[lindex [site_node::get_url_from_object_id -object_id $imsld_package_id] 0]/resources/active.png" - set manage "[_ imsld.View_members] | [_ imsld.Monitor]" + set manage "[_ imsld.View_members] | [_ imsld.Monitor]" } waiting { set image_alt "[_ imsld.waiting]" set image_title "[_ imsld.waiting]" set image_path "[lindex [site_node::get_url_from_object_id -object_id $imsld_package_id] 0]/resources/waiting.png" - set create_run " [_ imsld.create_new_run] " - set manage "[_ imsld.Manage_Members]" + set create_run " [_ imsld.create_new_run] " + set manage "[_ imsld.Manage_Members]" } stopped { set image_alt "[_ imsld.stopped]" set image_title "[_ imsld.stopped]" set image_path "[lindex [site_node::get_url_from_object_id -object_id $imsld_package_id] 0]/resources/completed.png" - set manage "[_ imsld.View_members] | [_ imsld.Monitor]" + set manage "[_ imsld.View_members] | [_ imsld.Monitor]" } } }