     s*))
 
 (defn log [& s]
-  (send-off *logger* log* s))
+  (send-off logger log* s))
 
 (defn partition-work
   "Break up total number of messages evenly over desired number of threads."

     (let [date (.format DATEFORMAT (Date.))]
       (dotimes [x n]
         (smtp-send host port (make-fixture from to))
         (swap! *counter* inc)
         (Thread/sleep delay))
       n))
  ([host port from to n delay threads]

                         ct))
                     (partition-work n threads)))]
       (.await latch)
       (reduce #(+ %1 (deref %2)) 0 res))))
