summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authoreltrac <hi@eltr.ac>2026-10-11 18:09:08 +0800
committereltrac <hi@eltr.ac>2026-10-11 18:09:08 +0800
commitf32700f931c0c0956102fc256e7c0c2f8f9519ee (patch)
tree399f43832ed0c962a150bbcfaf691572ea22ffdb /src
parentb3c915d33a67f8063ffb4ef8895523de47c9305c (diff)
retriever: fix mftype filter not working because type mismatch
microformats type in original response body (not converted to string by middleware) is a keyword, not a string. comparing a keyword to a string is always false.
Diffstat (limited to 'src')
-rw-r--r--src/weepinbell/webserver/retriever.clj3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/weepinbell/webserver/retriever.clj b/src/weepinbell/webserver/retriever.clj
index 51ee65b..4a21b02 100644
--- a/src/weepinbell/webserver/retriever.clj
+++ b/src/weepinbell/webserver/retriever.clj
@@ -57,7 +57,8 @@
(map #(wrap-response-object % opts) data))
(defn- filter-response-by-mftype [typ data]
- (filter #(= typ (get-in % [:microformats :type])) data))
+ (filter #(= (keyword typ)
+ (get-in % [:microformats :type])) data))
;; end utilities
(defn by-domain