Index: openacs-4/packages/forums/lib/forums/forums-history-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/forums/forums-history-chunk.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/forums/lib/forums/forums-history-chunk.tcl 7 Apr 2018 19:07:31 -0000 1.9 +++ openacs-4/packages/forums/lib/forums/forums-history-chunk.tcl 22 May 2018 15:59:27 -0000 1.10 @@ -16,7 +16,7 @@ set table_other_bgcolor [parameter::get -parameter table_other_bgcolor] # provide screen_name functionality -set screen_name [db_string select_screen_name { select screen_name from users where user_id = :user_id}] +set screen_name [acs_user::get_element -user_id $user_id -element screen_name] set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] template::list::create \ @@ -41,7 +41,21 @@ } } -db_multirow persons select_users_wrote_post {} +db_multirow -extend { + first_names + last_name +} persons select_users_wrote_post { + select user_id, + count(*) as num_msg, + to_char(max(last_child_post), 'YYYY-MM-DD HH24:MI:SS') as last_post + from forums_messages + where forum_id = :forum_id + group by user_id +} { + acs_user::get -user_id $user_id -array user + set first_names $user(first_names) + set last_name $user(last_name) +} if {[info exists alt_template] && $alt_template ne ""} { ad_return_template $alt_template Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/forums/lib/forums/forums-history-chunk.xql'. Fisheye: No comparison available. Pass `N' to diff?