Index: openacs-4/packages/download/www/admin/report-version-downloads.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-version-downloads.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/download/www/admin/report-version-downloads.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/download/www/admin/report-version-downloads.tcl	22 May 2001 04:17:45 -0000	1.2
@@ -15,14 +15,14 @@
 
 set dimensional {
    {versions "Versions" current {
-       {current "current" {where "dar.revision_id = content_item.get_live_revision(dar.archive_id)" }}
+       {current "current" {where "[db_map version_clause]" }}
        {all "all" ""}
    }}
 
     {downloaded "Download Period" 1m {
-	{1d "last 24hrs" {where "d.download_date + 1 > SYSDATE"}}
-        {1w "last week"  {where "d.download_date + 7 > SYSDATE"}}
-        {1m "last month" {where "d.download_date + 30 > SYSDATE"}}
+		{1d "last 24hrs" {where "[db_map date_clause_1]"}}
+        {1w "last week"  {where "[db_map date_clause_7]"}}
+        {1m "last month" {where "[db_map date_clause_30]"}}
         {all "all" {}}
     }}
 }
@@ -68,6 +68,11 @@
        [ad_dimensional_sql $dimensional where]
 "]
 
+#FIXME 
+# what is temp_downloaded for?
+# why are count and total_count the same query?
+# do we need version_str above?
+
 set temp_downloaded $downloaded
 
 set total_count [db_string count_select "select count(*)