diff options
| -rw-r--r-- | src/weepinbell/webhook.clj | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/weepinbell/webhook.clj b/src/weepinbell/webhook.clj index cfd796e..77345c5 100644 --- a/src/weepinbell/webhook.clj +++ b/src/weepinbell/webhook.clj @@ -1,12 +1,16 @@ (ns weepinbell.webhook (:require [clj-http.client :as client] [taoensso.timbre :as timbre] - [weepinbell.config :refer [get-config]])) + [weepinbell.config :refer [get-config]] + [weepinbell.utils :refer [valid-http-url?]])) (defn trigger [keyw] ;; keyw = on-receive... (when-let [hooks (get (get-config :webhook) keyw)] - (doall (map #((client/post %) - (timbre/info "Webhook triggered: " %)) - hooks)))) + (->> hooks + (filter string?) + (filter valid-http-url?) + (map #((client/post %) + (timbre/info "Webhook triggered: " %))) + doall))) |