Index: openacs-4/packages/forums/lib/message/threads-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/threads-chunk.tcl,v
diff -u -r1.3.2.5 -r1.3.2.6
--- openacs-4/packages/forums/lib/message/threads-chunk.tcl 22 Nov 2006 10:03:20 -0000 1.3.2.5
+++ openacs-4/packages/forums/lib/message/threads-chunk.tcl 24 Nov 2006 13:22:46 -0000 1.3.2.6
@@ -33,15 +33,15 @@
# 2. User is a moderator or adminsitrator
if {([forum::new_questions_allowed_p -forum_id $forum_id] && ($forum(posting_policy) == "open" || $forum(posting_policy) == "moderated")) || [template::util::is_true $permissions(admin_p)] || [template::util::is_true $permissions(moderate_p)] } {
- lappend actions [_ forums.Post_a_New_Message] [export_vars -base "${base_url}message-post" { forum_id }] {}
+ lappend actions [_ forums.Post_a_New_Message] [export_vars -base "${base_url}message-post" { forum_id }] [_ forums.Post_a_New_Message]
}
if { [template::util::is_true $permissions(admin_p)] } {
- lappend actions [_ forums.Administer] [export_vars -base "admin/forum-edit" { forum_id {return_url [ad_return_url]}}] {}
+ lappend actions [_ forums.Administer] [export_vars -base "admin/forum-edit" { forum_id {return_url [ad_return_url]}}] [_ forums.Administer]
}
if { [template::util::is_true $permissions(moderate_p)] } {
- lappend actions [_ forums.ManageModerate] [export_vars -base "${base_url}moderate/forum" { forum_id }] {}
+ lappend actions [_ forums.ManageModerate] [export_vars -base "${base_url}moderate/forum" { forum_id }] [_ forums.ManageModerate]
}
template::list::create \
@@ -55,6 +55,7 @@
subject {
label "#forums.Subject#"
link_url_col message_url
+ link_html {title "\#forums.goto_thread_subject\#"}
display_template {
@messages.subject@
@messages.subject@
@@ -67,6 +68,7 @@
user_name {
label "#forums.Author#"
link_url_col user_url
+ link_html {title "\#forums.show_history_user_name\#"}
}
n_messages {
label "#forums.Replies#"