Index: openacs-4/packages/lars-blogger/lars-blogger.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/lars-blogger.info,v
diff -u -r1.28 -r1.29
--- openacs-4/packages/lars-blogger/lars-blogger.info	11 Dec 2003 21:40:05 -0000	1.28
+++ openacs-4/packages/lars-blogger/lars-blogger.info	14 Dec 2003 13:27:14 -0000	1.29
@@ -36,6 +36,7 @@
             <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="MaxNumEntriesOnFrontPage"  description="Maximum number of entries to show on the weblog front page. 0 or empty string for no maximum."/>
             <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="MinNumEntriesOnFrontPage"  default="3" description="Minimum number of entries to show on the weblog front page. 0 or empty string for no minimum."/>
             <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="NumDaysOnFrontPage"  default="30" description="Number of days worth of entries on the weblog front page. Default is 30. Set to 0 or empty string for no date limit."/>
+            <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="NumberOfCommentsInIncludelet"  default="10" description="How many comments should be included in the &quot;last n comments&quot; includelet?"/>
             <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="ShowPosterP"  default="1" description="Show who posted the entry and when"/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="StylesheetURL"  default="/resources/lars-blogger/lars-blogger.css" description="The url to the stylesheet used in conjunction with the weblog instance."/>
             <parameter datatype="number"  min_n_values="1"  max_n_values="1"  name="TrackbackMaxExcerpt"  default="200" description="Maximum length of excerpt to send for trackback" section_name="Trackback"/>
Index: openacs-4/packages/lars-blogger/tcl/blogroll-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/blogroll-procs-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lars-blogger/tcl/blogroll-procs-postgresql.xql	14 Dec 2003 13:27:15 -0000	1.1
@@ -0,0 +1,11 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <fullquery name="lars_blogger::blogroll::delete_from_package.delete_from_package">
+        <querytext>
+            select  weblogger_blogroll_entry__delete(link_id)
+            from    weblogger_blogroll_entries
+            where   package_id = :package_id
+        </querytext>
+    </fullquery>
+</queryset>
\ No newline at end of file
Index: openacs-4/packages/lars-blogger/tcl/blogroll-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/blogroll-procs.tcl,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lars-blogger/tcl/blogroll-procs.tcl	14 Dec 2003 13:27:15 -0000	1.1
@@ -0,0 +1,23 @@
+ad_library {
+    API for blogroll management in weblogger.
+    
+    @author Guan Yang (guan@unicast.org)
+    @creation-date 2003-12-14
+}
+
+namespace eval lars_blogger {}
+namespace eval lars_blogger::blogroll {}
+
+ad_proc lars_blogger::blogroll::delete_from_package {
+    -package_id
+} {
+    Deletes all blogroll entries for the given package.
+    
+    @author Guan Yang (guan@unicast.org)
+} {
+    if { ![info exists package_id] } {
+        set package_id [ad_conn package_id]
+    }
+    
+    db_foreach delete_from_package "" {}
+}
\ No newline at end of file
Index: openacs-4/packages/lars-blogger/tcl/install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/install-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/lars-blogger/tcl/install-procs.tcl	13 Dec 2003 20:03:35 -0000	1.4
+++ openacs-4/packages/lars-blogger/tcl/install-procs.tcl	14 Dec 2003 13:27:15 -0000	1.5
@@ -42,5 +42,6 @@
     @author Vinod Kurup
 } {
     db_dml remove_ping_urls ""
+    lars_blogger::blogroll::delete_from_package -package_id $package_id
     db_exec_plsql clear_content {}
 }
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.24 -r1.25
--- openacs-4/packages/lars-blogger/www/index.adp	14 Dec 2003 11:10:44 -0000	1.24
+++ openacs-4/packages/lars-blogger/www/index.adp	14 Dec 2003 13:27:15 -0000	1.25
@@ -85,6 +85,11 @@
         <include src="/packages/lars-blogger/lib/last-n-comments" number_of_comments="10">
       </div>
 
+	<div class="lars_blogger_portlet">
+	  <h2>Blogroll</h2>
+	  <include src="/packages/lars-blogger/lib/blogroll">
+	</div>
+
     </div>