Index: openacs.org-dev/packages/forums/www/forum-view-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/forums/www/forum-view-postgresql.xql,v
diff -u -r1.7 -r1.8
--- openacs.org-dev/packages/forums/www/forum-view-postgresql.xql	1 Jul 2003 17:07:00 -0000	1.7
+++ openacs.org-dev/packages/forums/www/forum-view-postgresql.xql	1 Jul 2003 17:37:23 -0000	1.8
@@ -89,4 +89,49 @@
         </querytext>
     </partialquery>
 
+    <fullquery name="messages_select_unanswered">
+        <querytext>
+            select fm.message_id,
+                   fm.subject,
+                   fm.user_id,
+                   person__name(fm.user_id) as user_name,
+                   fm.posting_date,
+                   fm.state,
+                   (select count(*)
+                    from $forums_table fm1
+                    where fm1.forum_id = :forum_id
+                    and fm1.tree_sortkey between tree_left(fm.tree_sortkey) and tree_right(fm.tree_sortkey)) as n_messages,
+		    to_char(fm.last_child_post, 'Mon DD YYYY HH24:MI:SS') as last_child_post,
+                    case when fm.last_child_post > (now() - 1) then 't' else 'f' end as new_p
+            from forums_messages_approved fm
+            where fm.forum_id = :forum_id
+            and fm.parent_id is null
+	    and fm.max_child_sortkey is null
+            order by fm.posting_date desc
+        </querytext>
+    </fullquery>
+
+    <partialquery name="messages_select_unanswered_display_data_partial">
+        <querytext>
+            select fm.message_id,
+                   fm.subject,
+                   fm.user_id,
+                   person__name(fm.user_id) as user_name,
+                   fm.posting_date,
+                   fm.state,
+                   (select count(*)
+                    from $forums_table fm1
+                    where fm1.forum_id = :forum_id
+                    and fm1.tree_sortkey between tree_left(fm.tree_sortkey) and tree_right(fm.tree_sortkey)) as n_messages,
+	            to_char(fm.last_child_post, 'Mon DD YYYY HH24:MI:SS') as last_child_post,
+                    case when fm.last_child_post > (now() - 1) then 't' else 'f' end as new_p
+            from forums_messages fm
+            where fm.forum_id = :forum_id
+            and fm.parent_id is null
+	    and fm.max_child_sortkey is null
+	    and fm.message_id IN (CURRENT_PAGE_SET)
+            order by fm.posting_date desc
+        </querytext>
+    </partialquery>
+
 </queryset>
Index: openacs.org-dev/packages/forums/www/forum-view.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/forums/www/forum-view.adp,v
diff -u -r1.16 -r1.17
--- openacs.org-dev/packages/forums/www/forum-view.adp	1 Jul 2003 17:10:10 -0000	1.16
+++ openacs.org-dev/packages/forums/www/forum-view.adp	1 Jul 2003 17:37:23 -0000	1.17
@@ -26,7 +26,7 @@
 	</if>	  
       </td>
       <td align="right">
-	<if @mode@ ne "latest"><a href="forum-view?forum_id=@forum_id@&mode=latest">Sort by most recent reply</a></if><else><a href="forum-view?forum_id=@forum_id@">Sort by original post date</a></else></td>
+	<if @mode@ ne "latest"><a href="forum-view?forum_id=@forum_id@&mode=latest">Sort by most recent reply</a></if><else><a href="forum-view?forum_id=@forum_id@">Sort by original post date</a></else><if @mode@ ne "unanswered"><br /><a href="forum-view?forum_id=@forum_id@&mode=unanswered">View unanswered posts</a></if></td>
     </tr>
   
     </table>