           (.getAddress address)))
 
 
-(defvar *parse-rules*
+(defvar parse-rules
   {
    "date"    {:value-fn (fn [msg]
                           (DateTools/dateToString

        (doseq [connection connections]
          (do-deletes connection indexfile))
        (do-optimize indexfile)))
    (Thread/sleep (:reindex-frequency *config*))
    (catch Throwable e
      (error "%s" e)
      (.printStackTrace e)))
  (send-off *agent* start-indexing indexfile connections))




           (javax.mail Session Message$RecipientType))
  (:require [net.dishevelled.mailindex.fieldpool :as fieldpool])
  (:use clojure.java.io
        [clojure.string :only [join]]
        clojure.contrib.seq
        clojure.contrib.def)

  (:gen-class))


(def date-output-format
     (doto (SimpleDateFormat. "EEE, dd MMM yyyy HH:mm:ss Z")
       (.setTimeZone (SimpleTimeZone. 0 "UTF"))))


(def date-formatters
     (map #(doto (SimpleDateFormat. %)
             (.setTimeZone (SimpleTimeZone. 0 "UTF")))
          ["EEE, dd MMM yyyy"
