Index: openacs-4/packages/lars-blogger/lib/last-n-comments-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/lib/last-n-comments-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lars-blogger/lib/last-n-comments-postgresql.xql	13 Dec 2003 20:06:14 -0000	1.1
@@ -0,0 +1,29 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <fullquery name="select_n_comments">
+        <querytext>
+        select
+            r.title,
+            r.publish_date,
+            e.entry_id,
+            person__name(o.creation_user) as item_author
+        from
+            cr_revisions r,
+            cr_items i,
+            general_comments c,
+            pinds_blog_entries e,
+            acs_objects o
+        where
+            e.package_id = :package_id and
+            c.object_id = e.entry_id and
+            i.item_id = c.comment_id and
+            i.live_revision = r.revision_id and
+            i.item_id = o.object_id
+        order by
+            r.publish_date desc
+        limit
+            $number_of_comments
+                </querytext>
+    </fullquery>
+</queryset>
Index: openacs-4/packages/lars-blogger/lib/last-n-comments.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/lib/last-n-comments.adp,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lars-blogger/lib/last-n-comments.adp	13 Dec 2003 20:06:14 -0000	1.1
@@ -0,0 +1,5 @@
+<ol class="lars_blogger_n_comments">
+<multiple name="comments">
+    <li class="lars_blogger_n_comments_n"><if @comments.item_author@ not nil><span class="lars_blogger_n_comments_author">@comments.item_author@: </span></if><a href="@comments.entry_url@">@comments.title@</a></li>
+</multiple>
+</ol>
Index: openacs-4/packages/lars-blogger/lib/last-n-comments.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/lib/last-n-comments.tcl,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lars-blogger/lib/last-n-comments.tcl	13 Dec 2003 20:06:14 -0000	1.1
@@ -0,0 +1,11 @@
+set package_id [ad_conn package_id]
+
+if { ![exists_and_not_null number_of_comments] || $number_of_comments == 0 } {
+    set number_of_comments [parameter::get \
+                                -default 10 \
+                                -parameter NumberOfCommentsInIncludelet]
+}
+
+db_multirow -extend {entry_url} comments select_n_comments "" {
+    set entry_url "[ad_url][lars_blog_public_package_url]/one-entry?[export_vars entry_id]"
+}
\ No newline at end of file
Index: openacs-4/packages/lars-blogger/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/index.adp,v
diff -u -r1.22 -r1.23
--- openacs-4/packages/lars-blogger/www/index.adp	13 Dec 2003 17:58:37 -0000	1.22
+++ openacs-4/packages/lars-blogger/www/index.adp	13 Dec 2003 20:06:14 -0000	1.23
@@ -82,9 +82,16 @@
           <a href="@rss_file_url@" title="RSS 2.0 feed"><img src="/resources/lars-blogger/xml.gif" width="36" height="14" border="0" alt="XML"></a>
         </div>
       </if>
+
+        <div class="lars_blogger_portlet">
+	  <h2>Recent Comments</h2>
+	  <include src="/packages/lars-blogger/lib/last-n-comments" number_of_comments="10">
+        </div>
+
     </div>
 
 
   </else>
 
+
 </div>
Index: openacs-4/packages/lars-blogger/www/resources/lars-blogger.css
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/resources/lars-blogger.css,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lars-blogger/www/resources/lars-blogger.css	13 Dec 2003 17:58:37 -0000	1.3
+++ openacs-4/packages/lars-blogger/www/resources/lars-blogger.css	13 Dec 2003 20:06:14 -0000	1.4
@@ -144,3 +144,11 @@
   color: #336699;
 }
 
+.lars_blogger_n_comments {
+	display: inline;
+}
+
+.lars_blogger_n_comments_n {
+	list-style-type: none;
+}
+