Index: openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl	25 May 2007 11:52:02 -0000	1.7
+++ openacs-4/packages/xowiki/www/portlets/weblog-mini-calendar.tcl	25 May 2007 12:58:20 -0000	1.8
@@ -57,7 +57,7 @@
   multirow append days_of_week [lindex $week_days [expr {($i + $first_day_of_week) % 7}]]
 }
 
-db_foreach entries_this_month "select count(ci.item_id), 
+db_foreach entries_this_month "select count(ci.item_id) as c, 
         [::xo::db::sql date_trunc day p.publish_date] as d \
         from xowiki_pagei p, cr_items ci \
         where ci.parent_id = $folder_id \
@@ -66,8 +66,8 @@
         and ci.item_id != $including_item_id \
         and ci.publish_status <> 'production' \
         and [::xo::db::sql date_trunc_expression month p.publish_date $year-$month-01] \
-        group by d" {
-          set entries([lindex $d 0]) $count
+        group by [::xo::db::sql date_trunc day p.publish_date]" {
+          set entries([lindex $d 0]) $c
         }
 
 multirow create days day_number beginning_of_week_p end_of_week_p today_p active_p url count class