From 4ceb781e10bcc96c1ed82f01ac42e359e384f04b Mon Sep 17 00:00:00 2001 From: Andros Fenollosa Date: Sun, 4 Aug 2019 01:21:44 +0200 Subject: [PATCH] Finish core --- src/isahn/core.clj | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/src/isahn/core.clj b/src/isahn/core.clj index 18d942b..82aa9d2 100644 --- a/src/isahn/core.clj +++ b/src/isahn/core.clj @@ -54,8 +54,6 @@ [news_stories] (def history_news_ids (concat history_ids (map #(get-in % ["id"]) news_stories))) (def history_all (map #(assoc {} :id %) (vec history_news_ids))) - (prn history_all) - (prn (generate-string history_all)) (with-open [w (clojure.java.io/writer path_history :append false)] (.write w (generate-string history_all))) ) @@ -86,9 +84,7 @@ [] (def stories_top (filter_stories (get_all_stories url_all_stories))) (doall (add_history stories_top)) - ;;(doall (add_history ({"id" 45} {"id" 55}))) - (prn stories_top) - ) + (doall (send_stories_telegram stories_top))) (defn -main "Main execution"