Index: openacs-4/packages/lars-blogger/tcl/entry-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/entry-procs.tcl,v diff -u -N -r1.21.2.1 -r1.21.2.2 --- openacs-4/packages/lars-blogger/tcl/entry-procs.tcl 25 Apr 2004 14:22:04 -0000 1.21.2.1 +++ openacs-4/packages/lars-blogger/tcl/entry-procs.tcl 2 Dec 2005 08:36:27 -0000 1.21.2.2 @@ -28,7 +28,6 @@ db_transaction { # Create the entry set entry_id [db_exec_plsql entry_add {}] - lars_blog_flush_cache $package_id } # If publish directly, fire off notifications and ping weblogs.com @@ -39,7 +38,7 @@ -no_update } - lars_blog_flush_cache $package_id + # lars_blog_flush_cache $package_id return $entry_id } @@ -125,16 +124,16 @@ } # Setup instance/user feeds if needed - lars_blog_setup_feed -package_id $package_id + # lars_blog_setup_feed -package_id $package_id # Notifications - lars_blogger::entry::do_notifications -entry_id $entry_id + # lars_blogger::entry::do_notifications -entry_id $entry_id # Ping weblogs.com - lars_blogger::instance::send_pings -package_id $package_id + # lars_blogger::instance::send_pings -package_id $package_id # trackback - lars_blogger::entry::trackback -entry_id $entry_id + # lars_blogger::entry::trackback -entry_id $entry_id } Index: openacs-4/packages/lars-blogger/www/entry-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-chunk.tcl,v diff -u -N -r1.19.2.3 -r1.19.2.4 --- openacs-4/packages/lars-blogger/www/entry-chunk.tcl 7 Oct 2005 08:19:53 -0000 1.19.2.3 +++ openacs-4/packages/lars-blogger/www/entry-chunk.tcl 2 Dec 2005 08:36:28 -0000 1.19.2.4 @@ -31,8 +31,13 @@ } if { ![exists_and_not_null return_url] } { - set return_url [ad_return_url] + # IMPORTANT: I changed the return_url here since ad_return_url also add the variables + # for the sw_category_id, year, month and day and this are already take in care in + # the indext.vuh file, ad_conn url returns only the URL without the variables + # set return_url [ad_return_url] + set return_url [ad_conn url] } + if { ![exists_and_not_null screen_name] } { set screen_name "" } 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 -N -r1.34.2.4 -r1.34.2.5 --- openacs-4/packages/lars-blogger/www/index.adp 7 Oct 2005 08:19:53 -0000 1.34.2.4 +++ openacs-4/packages/lars-blogger/www/index.adp 2 Dec 2005 08:36:28 -0000 1.34.2.5 @@ -38,15 +38,14 @@
- +
-

#lars-blogger.Archive#

- +
Index: openacs-4/packages/lars-blogger/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/index.tcl,v diff -u -N -r1.22.2.5 -r1.22.2.6 --- openacs-4/packages/lars-blogger/www/index.tcl 7 Oct 2005 08:19:53 -0000 1.22.2.5 +++ openacs-4/packages/lars-blogger/www/index.tcl 2 Dec 2005 08:36:28 -0000 1.22.2.6 @@ -174,7 +174,6 @@ db_multirow categories categories {} # Site-Wide Categories - if { ![empty_string_p $sw_category_id] } { set sw_category_name [category::get_name $sw_category_id] if { [empty_string_p $sw_category_name] } { @@ -198,7 +197,7 @@ } if {$sw_cats} { - db_multirow -unclobber -extend { sw_category_name tree_name } sw_categories sw_categories { + db_multirow -unclobber -extend { sw_category_name tree_name } sw_categories2 sw_categories { select c.category_id as sw_category_id, c.tree_id from categories c, category_tree_map ctm where ctm.tree_id = c.tree_id Index: openacs-4/packages/lars-blogger/www/index.vuh =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/index.vuh,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/lars-blogger/www/index.vuh 20 Feb 2004 05:43:02 -0000 1.4 +++ openacs-4/packages/lars-blogger/www/index.vuh 2 Dec 2005 08:36:28 -0000 1.4.2.1 @@ -31,7 +31,8 @@ if {[regexp {^/+(c|cat|category)/+([^/]+)/*$} $rest_url \ ignore_whole ignore_cat category_short_name]} { - rp_form_put category_short_name $category_short_name + rp_form_put category_short_name $category_short_name + } elseif {[regexp {^/+(a|archive)/*([0-9]*)/*([0-9]*)/*([0-9]*)/*$} \ $rest_url ignore_whole ignore_a year month day]} { if {[empty_string_p $year] && [empty_string_p $month] && \ @@ -44,8 +45,8 @@ rp_form_put year $year rp_form_put month $month rp_form_put day $day - } elseif {[regexp {^/+swcat/+([^/]+)/*} $rest_url \ - ignore_whole sw_category_id]} { + } elseif {[regexp {^/+swcat/+([^/]+)/*} $rest_url ignore_whole sw_category_id]} { + # SWC (Site-wide categories) # As the categories package currently doesn't have short names we Index: openacs-4/packages/lars-blogger/www/index.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/index.xql,v diff -u -N -r1.6 -r1.6.2.1 --- openacs-4/packages/lars-blogger/www/index.xql 20 Feb 2004 05:43:02 -0000 1.6 +++ openacs-4/packages/lars-blogger/www/index.xql 2 Dec 2005 08:36:28 -0000 1.6.2.1 @@ -4,9 +4,9 @@ - select to_date(:year || '-01-01') + select to_date(:year || '-01-01', 'YYYY-MM-DD') as archive_date, - to_char(to_date(:year || '-01-01'), 'YYYY') + to_char(to_date(:year || '-01-01', 'YYYY-MM-DD'), 'YYYY') as archive_date_pretty from dual 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 -N -r1.7 -r1.7.2.1 --- openacs-4/packages/lars-blogger/www/resources/lars-blogger.css 14 Dec 2003 16:48:28 -0000 1.7 +++ openacs-4/packages/lars-blogger/www/resources/lars-blogger.css 2 Dec 2005 08:36:28 -0000 1.7.2.1 @@ -93,10 +93,17 @@ text-transform: uppercase; padding: 3px; letter-spacing: .3em; + color: white; } +.lars_blogger_portlet h3 { + text-decoration: none; + color: white; +} + .lars_blogger_portlet a { text-decoration: none; + color: white; } .lars_blogger_portlet a:link { color: #;