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 -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 \
                 "<a href='$h_url'><img src='$s_url' $extra_img_tags></a>"
     } else {
-        set result $target_url
+        set result "<a href=\"$target_url\"><img src='$s_url' $extra_img_tags></a>"
 
         # update the impressions since this won't get called
         # through adimg.tcl