         objective-id (:_id objective)
         candidates (:candidates data)
         flash (:flash doc)
+        modal (:flash doc)
         optionally-disable-voting (if (tf/in-drafting? objective)
                                     (pf/disable-voting-actions translations)
                                     identity)]

       "&body=" (translations :invitation-modal/email-body-line-1) " " (:title objective)
       "%0d%0d" (translations :invitation-modal/email-body-line-2) "%0d" (:invitation-url flash)))

(defn writer-invitation-modal [flash objective translations]
  (html/transformation
    [:.clj-invitation-url] (html/set-attr "value" (:invitation-url flash))
    [:.clj-mail-to] (html/set-attr :href (mail-to-string flash
                                                         objective
                                                         translations))))

(def invitation-response-snippet (html/select (html/html-resource "templates/jade/objective-invitation-response.html") [:.clj-invitation-response]))


                                                               (invitation-rsvp-for-objective? objective invitation-rsvp) (dissoc context :invitation-rsvp)
                                                               :else context)))
                                      [:.clj-modal-contents]
                                      (case (:type modal)
                                        :invitation (writer-invitation-modal context)
                                        :share-question (share-question-modal context)
                                        (when (invitation-rsvp-for-objective? objective invitation-rsvp) 
                                          (invitation-rsvp-modal context)))

