diff options
| author | eltrac <hi@eltr.ac> | 2026-03-17 11:52:00 +0800 |
|---|---|---|
| committer | eltrac <hi@eltr.ac> | 2026-03-17 11:52:00 +0800 |
| commit | 2a01b71a5beb4c07060e39ea7aeb04488efca09b (patch) | |
| tree | bf50937624ca893f5c3990df4b9405399e3b2f59 | |
| parent | df4fef27fb0bd64ba64ca5a08302c6eafc6cbdfb (diff) | |
docs: add cost notice to load-data docstring
| -rw-r--r-- | src/weepinbell/storage.clj | 3 |
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] |
