File tree Expand file tree Collapse file tree 1 file changed +0
-3
lines changed Expand file tree Collapse file tree 1 file changed +0
-3
lines changed Original file line number Diff line number Diff line change 622622(defn error-result [strings message debug-info]
623623 (debug-result-template strings " error" :operation-failed message debug-info))
624624
625- ; ; Updated check-if-subscribed function
626625(defn check-if-subscribed [email]
627626 (log/info " Checking if email is already subscribed:" email)
628627
636635 (and (not (:error response))
637636 (= 200 (:status response)))))
638637
639- ; ; Updated unsubscribe-from-mailgun function
640638(defn unsubscribe-from-mailgun [email]
641639 (log/info " Attempting to unsubscribe email:" email)
642640
674672 :debug {:status (:status response)
675673 :body (:body response)}}))))
676674
677- ; ; Updated subscribe-to-mailgun function
678675(defn subscribe-to-mailgun [email]
679676 (log/info " Attempting to subscribe email:" email)
680677
You can’t perform that action at this time.
0 commit comments