This commit is contained in:
Anish Lakhwara 2022-09-11 11:47:22 +10:00
parent a03ca0b389
commit eb542d9760

View file

@ -14,6 +14,9 @@
album-of-the-day (->> filtered-shaarli-data album-of-the-day (->> filtered-shaarli-data
(mapv #(select-keys % [:url :title])) (mapv #(select-keys % [:url :title]))
rand-nth) rand-nth)
;file-data (sh "ls" (System/getenv "folder"))
; remove anything in () [] {}
;filtered-file-data (filterv #(string/replace % #"(.*)" "") file-data)
shaarli-message (str "Album of the day is: " (get album-of-the-day :title) shaarli-message (str "Album of the day is: " (get album-of-the-day :title)
"\n available at: " (get album-of-the-day :url)) "\n available at: " (get album-of-the-day :url))
wallabag-entry-of-the-day (rand-nth (wallabag/get-archived-annotated-entries)) wallabag-entry-of-the-day (rand-nth (wallabag/get-archived-annotated-entries))
@ -24,8 +27,5 @@
"\n tagged as: " (string/join ", " (get wallabag-entry-of-the-day :tags))) "\n tagged as: " (string/join ", " (get wallabag-entry-of-the-day :tags)))
on-this-day-file (files/slurp-if-file) on-this-day-file (files/slurp-if-file)
message (string/join "\n\n" [shaarli-message wallabag-message on-this-day-file])] message (string/join "\n\n" [shaarli-message wallabag-message on-this-day-file])]
;file-data (sh "ls" (System/getenv "folder"))
; remove anything in () [] {}
;filtered-file-data (filterv #(string/replace % #"(.*)" "") file-data)
(matrix/post-message message))) (matrix/post-message message)))