comments
This commit is contained in:
parent
a03ca0b389
commit
eb542d9760
|
@ -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)))
|
||||||
|
|
Loading…
Reference in a new issue