Index: openacs-4/packages/chat/www/transcript-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete-2.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/chat/www/transcript-delete-2.tcl	20 Apr 2001 20:51:08 -0000	1.1
+++ openacs-4/packages/chat/www/transcript-delete-2.tcl	11 Dec 2003 21:40:00 -0000	1.2
@@ -10,7 +10,7 @@
 ad_require_permission $transcript_id chat_transcript_delete
 
 if { [catch {chat_transcript_delete $transcript_id} errmsg] } {
-    ad_return_complaint "Delete transcript failed." $errmsg
+    ad_return_complaint 1 "Delete transcript failed: $errmsg"
 }
 
 ad_returnredirect "room?room_id=$room_id"