         (xml/emit {:tag :whitelist :content (for [word words]
                                              {:tag :word :attrs {
                                                              :added-by     (:user word)
-                                                             :date-time (:datetime word)
-                                                             :deleted  (:deleted word)}
-                                                             :content  [(:word word)]})})))
+                                                             :date-time    (:datetime word)
+                                                             :deleted      (:deleted word)
+                                                             :description  (:description word)}
+                                                             :content      [(:word word)]})})))
 
 (defn process-wordlist-json
     [request]

          message   (add-words-message words)]
          (if (seq words)
              (store-words words user-name))
        (finish-processing request nil message)))

(defn perform-operation
    [request]

        (println "-> " user-name)
        user-name))

(defn zw-mode?
    [request]
    (-> (:configuration request)
        :server
        :mode
        (= "zw")))

(defn get-url-prefix
    [request]
    (-> (:configuration request)
