Index: openacs-4/packages/acs-lang/www/admin/message-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/message-list.tcl,v diff -u -N -r1.19 -r1.19.2.1 --- openacs-4/packages/acs-lang/www/admin/message-list.tcl 28 May 2018 13:36:18 -0000 1.19 +++ openacs-4/packages/acs-lang/www/admin/message-list.tcl 8 Apr 2019 13:24:37 -0000 1.19.2.1 @@ -109,13 +109,15 @@ set where_clause "and [join $where_clauses "\n and "]" } -db_multirow -extend { +db_multirow -extend { edit_url delete_url + undelete_url message_key_pretty } messages select_messages {} { - set edit_url [export_vars -base edit-localized-message { locale package_key message_key show {return_url [ad_return_url]} }] - set delete_url [export_vars -base message-delete { locale package_key message_key show {return_url [ad_return_url]} }] + set edit_url [export_vars -base edit-localized-message { locale package_key message_key show {return_url [ad_return_url]} }] + set undelete_url [export_vars -base message-undelete { locale package_key message_key show {return_url [ad_return_url]} }] + set delete_url [export_vars -base message-delete { locale package_key message_key show {return_url [ad_return_url]} }] set message_key_pretty "$package_key.$message_key" }