Index: openacs-4/packages/chat/www/moderator-grant.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/moderator-grant.tcl,v
diff -u -N -r1.6.2.1 -r1.6.2.2
--- openacs-4/packages/chat/www/moderator-grant.tcl	14 Feb 2019 16:15:01 -0000	1.6.2.1
+++ openacs-4/packages/chat/www/moderator-grant.tcl	2 Mar 2019 17:51:10 -0000	1.6.2.2
@@ -23,7 +23,9 @@
 set submit_label "[_ chat.Grant]"
 set title "[_ chat.Grant_moderator]"
 set action "moderator-grant-2"
-set description "[_ chat.Grant_moderator_for] <b>[chat_room_name $room_id]</b> [_ chat.to]"
+set r [::xo::db::Class get_instance_from_db -id $room_id]
+set room_name [$r set pretty_name]
+set description "[_ chat.Grant_moderator_for] <b>$room_name</b> [_ chat.to]"
 db_multirow parties list_parties {}
 
 ad_return_template grant-entry