From 4080ac14352504b885376b690570ece9f45353bc Mon Sep 17 00:00:00 2001 From: Andros Fenollosa Date: Sat, 31 Jul 2021 11:07:41 +0200 Subject: [PATCH] Update feeds.clj --- src/rsspaper/feeds.clj | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/rsspaper/feeds.clj b/src/rsspaper/feeds.clj index bb2dc75..a75369b 100644 --- a/src/rsspaper/feeds.clj +++ b/src/rsspaper/feeds.clj @@ -42,8 +42,8 @@ (map (fn [article] (let [url-article (get-in article [:feed :link]) html (:body (client/get url-article {:insecure? true})) - first-content (second (re-find #"]+)\".*property=\"og:image(?::url)?\".*>" html)) - second-content (second (re-find #"]+)\".*>" html)) + first-content (second (re-find #"].*[^>]content=\"([^\">]+)\".*[^>]property=\"og:image(?::url)?\".*>" html)) + second-content (second (re-find #"].*[^>]property=\"og:image(?::url)?\".*[^>]content=\"([^\">]+)\".*>" html)) first-image (second (re-find #"]+src=\"([^\">]+)\"" html)) images [first-content second-content first-image] final-image (first (filter (fn [item] (not (nil? item))) images))] @@ -74,4 +74,4 @@ filter-edition order-published add-cover-article - add-datetimes-formatter)) \ No newline at end of file + add-datetimes-formatter))