andros/important-stories-alert-for-hacker-news
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

Filter Ask HN

Browse Source
This commit is contained in:
Andros Fenollosa
2022-01-02 10:06:34 +01:00
parent da6f779f91
commit 529fa33de5
2 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/isahn/core.clj
View File

@ -60,10 +60,13 @@
;; Filter created less 24h
(let [stories_24h (filter #(> (get-in % ["time"]) min_time) stories)
;; Filter history
stories_without_histories (filter #(not (lazy_contains? history_ids (get-in % ["id"]))) stories_24h)]
;; Filter with score min_score
(filter #(> (get-in % ["score"]) min_score) stories_without_histories)))
stories_without_histories (filter #(not (lazy_contains? history_ids (get-in % ["id"]))) stories_24h)
;; Filter "Ask HN:"
stories_without_ask_HN (filter #(not (lazy_contains? "Ask HN:" (get-in % ["title"]))) stories_without_histories)
;; Filter with score min_score
stories_less_24h (filter #(> (get-in % ["score"]) min_score) stories_without_ask_HN)]
;; Return
stories_less_24h))
(defn filter_with_url
"Filter by removing stories that do not have the URL property"