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 -N -r1.37 -r1.38
--- openacs-4/packages/lars-blogger/lars-blogger.info 2 Apr 2004 01:01:08 -0000 1.37
+++ openacs-4/packages/lars-blogger/lars-blogger.info 23 Feb 2005 15:28:57 -0000 1.38
@@ -26,6 +26,7 @@
+
Index: openacs-4/packages/lars-blogger/tcl/blogger-api-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/blogger-api-procs-oracle.xql,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/lars-blogger/tcl/blogger-api-procs-oracle.xql 14 Dec 2003 12:34:25 -0000 1.3
+++ openacs-4/packages/lars-blogger/tcl/blogger-api-procs-oracle.xql 23 Feb 2005 15:28:57 -0000 1.4
@@ -13,7 +13,7 @@
and package_id = :package_id
and draft_p = 'f'
and deleted_p = 'f'
- order by entry_date desc
+ order by entry_date desc, entry_id desc
) where rownum <= :numberOfPosts
Index: openacs-4/packages/lars-blogger/tcl/blogger-api-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/blogger-api-procs-postgresql.xql,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/lars-blogger/tcl/blogger-api-procs-postgresql.xql 14 Dec 2003 12:34:25 -0000 1.3
+++ openacs-4/packages/lars-blogger/tcl/blogger-api-procs-postgresql.xql 23 Feb 2005 15:28:57 -0000 1.4
@@ -12,7 +12,7 @@
where package_id = :package_id
and draft_p = 'f'
and deleted_p = 'f'
- order by entry_date desc
+ order by entry_date desc, entry_id desc
limit $numberOfPosts
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 -N -r1.6 -r1.7
--- openacs-4/packages/lars-blogger/tcl/install-procs.tcl 27 Feb 2004 19:16:24 -0000 1.6
+++ openacs-4/packages/lars-blogger/tcl/install-procs.tcl 23 Feb 2005 15:28:57 -0000 1.7
@@ -4,10 +4,15 @@
namespace eval lars_blogger::install {}
-ad_proc -public lars_blogger::install::package_instantiate { -package_id } {
+ad_proc -public lars_blogger::install::after_mount { -package_id -node_id } {
Procedures to run on package instantiation
} {
+ lars_blog_setup_feed -package_id $package_id
+}
+ad_proc -public lars_blogger::install::package_instantiate { -package_id } {
+ Procedures to run on package instantiation
+} {
lars_blogger::install::grant_gc_create -package_id $package_id
}
Index: openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl,v
diff -u -N -r1.21 -r1.22
--- openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl 17 May 2004 15:15:19 -0000 1.21
+++ openacs-4/packages/lars-blogger/tcl/lars-blogger-procs.tcl 23 Feb 2005 15:28:57 -0000 1.22
@@ -16,7 +16,7 @@
}
set timeout [expr 30*60]
- set channel_title [lars_blog_name]
+ set channel_title [lars_blog_name -package_id $package_id]
set creation_user [ad_conn user_id]
set creation_ip [ns_conn peeraddr]
Index: openacs-4/packages/lars-blogger/tcl/metaweblog-api-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/metaweblog-api-procs-postgresql.xql,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/lars-blogger/tcl/metaweblog-api-procs-postgresql.xql 14 Dec 2003 12:34:25 -0000 1.3
+++ openacs-4/packages/lars-blogger/tcl/metaweblog-api-procs-postgresql.xql 23 Feb 2005 15:28:57 -0000 1.4
@@ -15,7 +15,7 @@
where e.package_id = :package_id
and draft_p = 'f'
and deleted_p = 'f'
- order by entry_date desc
+ order by entry_date desc,entry_id desc
limit $num_posts
Index: openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl 27 Feb 2004 19:16:25 -0000 1.2
+++ openacs-4/packages/lars-blogger/tcl/test/blogger-api-procs.tcl 23 Feb 2005 15:28:57 -0000 1.3
@@ -46,8 +46,12 @@
} {
# destructor
- apm_package_instance_delete $blog_id
- acs_user::delete -permanent -user_id $user_id
+ if {[catch {
+ apm_package_instance_delete $blog_id
+ acs_user::delete -permanent -user_id $user_id
+ } errMsg]} {
+ ns_log error "create_blog_and_user teardown failed: $errMsg"
+ }
}
aa_register_case -cats web -init_classes {
Index: openacs-4/packages/lars-blogger/www/entry-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-edit.tcl,v
diff -u -N -r1.23 -r1.24
--- openacs-4/packages/lars-blogger/www/entry-edit.tcl 20 Apr 2004 21:13:46 -0000 1.23
+++ openacs-4/packages/lars-blogger/www/entry-edit.tcl 23 Feb 2005 15:28:57 -0000 1.24
@@ -55,7 +55,7 @@
{html {size 50}}}
{title_url:text,optional
{label "Title URL"}
- {help_text "If this entry is a rant on a web page you can \
+ {help_text "If this entry is about a web page you can \
put the full URL here, e.g. ${valid_url_example}. The \
title of your entry will then become a hyperlink to \
that web page."}