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.14 -r1.14.4.1
--- openacs-4/packages/imsld/www/admin/index.tcl 25 Apr 2007 10:52:30 -0000 1.14
+++ openacs-4/packages/imsld/www/admin/index.tcl 30 May 2007 08:06:17 -0000 1.14.4.1
@@ -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]"
}
}
}