Catch all Throwable
This commit is contained in:
parent
91b2c85fcc
commit
8d8e6b22f1
|
@ -1,4 +1,4 @@
|
||||||
(defproject rsspaper "1.2.3"
|
(defproject rsspaper "1.2.4"
|
||||||
:description "RSSpaper"
|
:description "RSSpaper"
|
||||||
:url "https://github.com/tanrax/RSSpaper"
|
:url "https://github.com/tanrax/RSSpaper"
|
||||||
:license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0"
|
:license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0"
|
||||||
|
|
|
@ -91,12 +91,9 @@
|
||||||
(conj feeds (assoc feed :feed-url feed-url))
|
(conj feeds (assoc feed :feed-url feed-url))
|
||||||
; Alert fail
|
; Alert fail
|
||||||
(prn (str "Error with '" feed-url) "'")))
|
(prn (str "Error with '" feed-url) "'")))
|
||||||
(catch clojure.lang.ExceptionInfo e
|
(catch Throwable e
|
||||||
(let [response (ex-data e)
|
|
||||||
{:keys [status headers]} response]
|
|
||||||
(prn (str feed-url " has been ignored because of bad formatting."))
|
(prn (str feed-url " has been ignored because of bad formatting."))
|
||||||
;; do anything you want
|
)))
|
||||||
))))
|
|
||||||
[] (:feeds config))
|
[] (:feeds config))
|
||||||
zip-feeds-in-articles
|
zip-feeds-in-articles
|
||||||
datetimes-to-unixtime
|
datetimes-to-unixtime
|
||||||
|
|
Loading…
Reference in New Issue