Index: openacs-4/packages/chat/lib/transcripts.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/lib/transcripts.tcl,v diff -u -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/chat/lib/transcripts.tcl 14 Feb 2019 16:15:01 -0000 1.5.2.1 +++ openacs-4/packages/chat/lib/transcripts.tcl 9 Feb 2020 15:30:16 -0000 1.5.2.2 @@ -15,7 +15,7 @@ transcript_url delete_url } chat_transcripts list_transcripts { - select ct.transcript_id, ct.pretty_name, ao.creation_date + select ct.transcript_id, ct.pretty_name, ao.creation_date from chat_transcripts ct, acs_objects ao where ct.transcript_id = ao.object_id and ct.room_id = :room_id order by ao.creation_date desc @@ -28,7 +28,7 @@ set actions {} if {$transcript_create_p} { lappend actions \ - [_ chat.Create_transcript] [export_vars -base "transcript-new" {room_id}] "" + [_ chat.Create_transcript] [export_vars -base "transcript-new" {room_id}] "" } list::create \ @@ -52,10 +52,16 @@ html { align "center" } display_template { - - #chat.Delete_transcript# - + + #chat.Delete_transcript# + } } } + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: