          (merge data)
          (post-util/copy-original-body))))
 
-(defn get-post-file-data
+(defn get-file-data
   [this data]
   (log/debug "Adding file data ...")
   (let [file-obj (:file data)

    (assoc data :url url
                :link link)))

(defn get-post-dates
  [this data]
  (log/debug "Adding post dates ...")
  (let [date (util/path->date (:src-file data))

(defrecord DefaultBlogPostProcessor [system])

(def behaviour
  {:get-data get-data
   :get-file-data get-file-data
   :get-counts get-counts
   :get-link get-link
   :get-dates get-dates
   :get-tags get-tags
   :get-excerpts get-excerpts
   :get-body get-body})

(defn new-processor
  [system]
