Index: openacs-4/packages/chat/www/transcript-edit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-edit-2.tcl,v
diff -u -r1.10.2.1 -r1.10.2.2
--- openacs-4/packages/chat/www/transcript-edit-2.tcl	14 Feb 2019 16:15:01 -0000	1.10.2.1
+++ openacs-4/packages/chat/www/transcript-edit-2.tcl	2 Mar 2019 17:51:10 -0000	1.10.2.2
@@ -15,7 +15,13 @@
 
 permission::require_permission -object_id $transcript_id -privilege chat_transcript_edit
 
-if { [catch {chat_transcript_edit $transcript_id $transcript_name $description $contents} errmsg] } {
+if { [catch {
+    set t [::xo::db::Class get_instance_from_db -id $transcript_id]
+    $t set pretty_name $transcript_name
+    $t set description $description
+    $t set contents    $contents
+    $t save
+} errmsg] } {
     ad_return_complaint 1 "[_ chat.Could_not_update_transcript]: $errmsg"
     ad_script_abort
 }