                                       :indexed)))))
 
 (defn #^IndexWriter create-index-writer [analyzer directory mode]
+  "Creates an IndexWriter with the provided analyzer and directory.
+   The mode has three options: :create, :append or :create-or-append."
   (let [config (IndexWriterConfig. (Version/LUCENE_35) analyzer)]
 
     (doto config

(def analyzer (create-analyzer))

(defn #^IndexReader create-index-reader [#^Directory directory]
  (. IndexReader open directory))

(defn #^Field create-field

               (map #(:title (:attrs %)) (html/select resource [:img]))))))
    html))

(defn #^Document create-document [vix-doc]
  "Creates a Lucene Document object representing the Vix document that
   is passed as a map (e.g. directly from the database).."
  (let [{:keys [feed
                slug
                title
