          :body "oops"}))
     {:status 401}))
 
-
 (defn objective-view [{:keys [t' locale] :as request}]
   (let [username (get (friend/current-authentication) :username)
         objective (storage/retrieve "d-cent-test" (-> request :route-params :id))]

            [d-cent.utils :as utils]
            [d-cent.workflows.twitter :refer [twitter-workflow]]))

(defn index [{:keys [t' locale]}]
  (let [username (get (friend/current-authentication) :username)]
  (rendered-response index-page {:translation t'

  (simple-response "blah"))

(defn email-capture-post [request]
  {:status 200})

(defn new-objective-link [stored-objective]
  (str utils/host-url "/objectives/" (:_id stored-objective)))

(defn objective-new-link-page [{:keys [t' locale]} stored-objective]
  (let [username (get (friend/current-authentication) :username)]
