Des erreurs de compilation de clojure déroutante - Rapports de mauvaise ligne?

Je reçois des erreurs compatibles lors de l'exécution Lein Run Code> sur mon Noir Projet. Cela fonctionnait, puis soudain, cela a cessé de fonctionner. Ma suspicion était que l'erreur est liée à essayer d'inclure [org.pegdown / piquetdown "1.1.0"] code> dans mon vecteur de dépendances dans le fichier de projet, mais je ne sais pas avec certitude. J'ai supprimé cette ligne, couru Lein propre; Lein Deps code> puis essayé Lein exécuter code> à nouveau, mais l'erreur persiste.

ci-dessous sont deux erreurs distinctes que je reçois. Je ne sais pas ce qui déclenche une erreur. Tous mes fichiers (dans l'espace de noms "Benekastah") signalent une erreur à la ligne 1, qui est typiquement un appel normal NS code>. P>

La deuxième erreur semble indiquer que le problème est Dans Post_Modify.clj, mais cela travaillait avant et je ne l'ai pas changé. P>

J'ai essayé la solution trouvée ici et il n'a pas semblé fonctionner. p>

Tout aperçu de ces erreurs déroutantes? p>

Erreur 1: P>

(ns benekastah.views.blog.post-modify
  (:require [noir.response :as resp]
            [somnium.congomongo :as congo]
            [clj-time.core :as time]
            [clj-time.format :as time-format]
            [clj-time.coerce :as time-coerce]
            [clojure.string :as cl-string]
            [benekastah.lib.string :as b-string])
  (:use noir.core
        benekastah.models.db))

(defn- save-post
  [post]
  (try (save! :post post)
       (resp/redirect "/")
    (catch Exception e
      {:status 500
       :body (str "Could not save post: " e)})))

(defpage [:post "/post"] [& param-lists]
         (let [params (populate-defaults 
                        :post 
                        (apply hash-map (apply concat param-lists)))
               {date :date, title :title } params
               slug (str 
                      (time-format/unparse 
                        (time-format/formatters :date)
                        (time-coerce/from-date date)) 
                      "_"
                      (cl-string/replace (cl-string/trim title)
                                         #"[^\w\-]"
                                         "_"))
               p (merge params {:slug slug})]
           (save-post p)))

(defpage [:put "/post"] {:keys [id]}
         (let [post (congo/fetch-by-id id)]
           (save-post post)))

(defpage [:delete "/post"] {:keys [id]}
         (let [post (congo/fetch-by-id id)]
           (congo/destroy! :post post)))