Index: openacs-4/packages/forums/www/forum-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/forum-view.tcl,v
diff -u -N -r1.13 -r1.14
--- openacs-4/packages/forums/www/forum-view.tcl	11 Dec 2002 13:33:01 -0000	1.13
+++ openacs-4/packages/forums/www/forum-view.tcl	10 Jan 2003 15:13:11 -0000	1.14
@@ -8,6 +8,7 @@
 
 } -query {
     forum_id:integer,notnull
+    {order_by "posting_date"}
 }
 
 
@@ -79,4 +80,7 @@
 
 set context [list $forum(name)]
 
+# Sort by first or last posting in a thread (subject)
+set sort_filter [forum::message::subject_sort_filter -forum_id $forum_id -order_by $order_by]
+
 ad_return_template