Index: openacs-4/packages/adserver/tcl/adserver-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/adserver/tcl/adserver-procs-postgresql.xql,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/adserver/tcl/adserver-procs-postgresql.xql 30 Jan 2002 11:25:25 -0000 1.1
+++ openacs-4/packages/adserver/tcl/adserver-procs-postgresql.xql 6 Nov 2003 17:26:55 -0000 1.2
@@ -21,7 +21,7 @@
update adv_log
set display_count = display_count + 1
where adv_key = :adv_key
- and entry_date = trunc (current_timestamp)
+ and entry_date = current_date
@@ -32,12 +32,12 @@
insert into adv_log
(adv_key, entry_date, display_count)
values (:adv_key,
- trunc (current_timestamp),
+ current_date,
(select 1
where 0 = (select count (*)
from adv_log
where adv_key = :adv_key
- and entry_date = trunc (current_timestamp))))
+ and entry_date = current_date)))
Index: openacs-4/packages/adserver/tcl/adserver-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/adserver/tcl/adserver-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/adserver/tcl/adserver-procs.tcl 18 Sep 2002 14:54:56 -0000 1.3
+++ openacs-4/packages/adserver/tcl/adserver-procs.tcl 6 Nov 2003 17:26:55 -0000 1.4
@@ -229,20 +229,20 @@
### or spit out doubleclickish url
######################################################
+ set s_url [adserver_src_attr \
+ -suppress_logging=$suppress_logging_p \
+ -adv_key $adv_key]
+
if {[string equal $track_clickthru_p t]} {
set h_url [adserver_href_attr \
-suppress_logging=$suppress_logging_p \
-adv_key $adv_key $target_url]
- set s_url [adserver_src_attr \
- -suppress_logging=$suppress_logging_p \
- -adv_key $adv_key]
-
set result \
""
} else {
- set result $target_url
+ set result ""
# update the impressions since this won't get called
# through adimg.tcl
Index: openacs-4/packages/adserver/www/default.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/adserver/www/default.adp,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/adserver/www/default.adp 22 May 2003 14:19:36 -0000 1.4
+++ openacs-4/packages/adserver/www/default.adp 6 Nov 2003 17:26:56 -0000 1.5
@@ -2,4 +2,4 @@