Index: openacs-4/packages/forums/lib/message/thread-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/forums/lib/message/thread-chunk.tcl	17 Dec 2003 15:45:29 -0000	1.1
+++ openacs-4/packages/forums/lib/message/thread-chunk.tcl	1 Apr 2004 16:14:29 -0000	1.2
@@ -78,8 +78,8 @@
 
 db_multirow -extend { posting_date_pretty direct_url number parent_number parent_direct_url } responses $query {} {
     set posting_date_pretty [lc_time_fmt $posting_date_ansi "%x %X"]
-    set direct_url "$direct_url_base\#$message(message_id)"
-    set number [expr [lsearch $message_id_list $message(message_id)] + 1]
+    set direct_url "$direct_url_base\#$message_id"
+    set number [expr [lsearch $message_id_list $message_id] + 1]
     set parent_number [expr [lsearch $message_id_list $parent_id] + 1]
     set parent_direct_url "$direct_url_base\#$parent_id"
 }