summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoreltrac <hi@eltr.ac>2026-03-17 11:52:00 +0800
committereltrac <hi@eltr.ac>2026-03-17 11:52:00 +0800
commit2a01b71a5beb4c07060e39ea7aeb04488efca09b (patch)
treebf50937624ca893f5c3990df4b9405399e3b2f59
parentdf4fef27fb0bd64ba64ca5a08302c6eafc6cbdfb (diff)
docs: add cost notice to load-data docstring
-rw-r--r--src/weepinbell/storage.clj3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/weepinbell/storage.clj b/src/weepinbell/storage.clj
index 859eca7..f8630a4 100644
--- a/src/weepinbell/storage.clj
+++ b/src/weepinbell/storage.clj
@@ -7,7 +7,7 @@
(def data-file (get-config :data-path))
(defn load-data
- "Read data file and return data as clojure data sturcture, a vector containing Webmention maps in this case."
+ "Read data file and return data as clojure data sturcture, a vector containing Webmention maps in this case. Note that is't extremely costly to load all data at once!"
[]
(with-open [r (io/reader data-file)]
(let [string-vector (-> r line-seq vec)]
@@ -45,6 +45,7 @@
(let [pred (get-predicate source target)]
(with-webmentions
#(first (filter pred %))))))
+
(defn delete-wm
([id] (delete-wm id nil))
([source target]