Index: openacs-4/packages/forums/tcl/messages-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs-postgresql.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/tcl/messages-procs-postgresql.xql	3 Jun 2002 06:51:25 -0000	1.3
+++ openacs-4/packages/forums/tcl/messages-procs-postgresql.xql	2 Jul 2002 19:42:19 -0000	1.4
@@ -19,6 +19,23 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="forum::message::get.select_message_with_attachment">
+        <querytext>
+            select forums_messages.*,
+                   (select count(*) from attachments where object_id= message_id) as n_attachments,
+                   person__name(forums_messages.user_id) as user_name, 
+                   party__email(forums_messages.user_id) as user_email,
+                   forums_forum__name(forums_messages.forum_id) as forum_name, 
+                   forums_message__root_message_id(forums_messages.message_id) as root_message_id,
+                   (select fm2.subject
+                    from forums_messages fm2 
+                    where fm2.message_id = forums_message__root_message_id(forums_messages.message_id)) as root_subject, 
+                   to_char(forums_messages.posting_date, 'Mon DD YYYY HH24:MI:SS') as posting_date
+            from forums_messages
+            where forums_messages.message_id= :message_id
+        </querytext>
+    </fullquery>
+
     <fullquery name="forum::message::do_notifications.select_forums_package_url">
         <querytext>
             select site_node__url(node_id)