aboutsummaryrefslogtreecommitdiff
path: root/Doom/.config/doom/modules/private/rss/config.el
diff options
context:
space:
mode:
Diffstat (limited to 'Doom/.config/doom/modules/private/rss/config.el')
-rw-r--r--Doom/.config/doom/modules/private/rss/config.el51
1 files changed, 0 insertions, 51 deletions
diff --git a/Doom/.config/doom/modules/private/rss/config.el b/Doom/.config/doom/modules/private/rss/config.el
deleted file mode 100644
index 4d8468a..0000000
--- a/Doom/.config/doom/modules/private/rss/config.el
+++ /dev/null
@@ -1,51 +0,0 @@
-;;; private/rss/config.el -*- lexical-binding: t; -*-
-
-(require 'seq)
-(require 'cl-lib)
-
-(defvar +rss/feed-urls '(("Arch Linux" "https://www.archlinux.org/feeds/news/" Linux)
- ("LEMMiNO" "https://www.youtube.com/feeds/videos.xml?channel_id=UCRcgy6GzDeccI7dkbbBna3Q" YouTube)
- ("Gamer from Mars" "https://www.youtube.com/feeds/videos.xml?channel_id=UCJ6z_yj_dDNrhn-c8ZyKV4g" YouTube)
- ("Pop Culture Detective" "https://www.youtube.com/feeds/videos.xml?channel_id=UCHiwtz2tCEfS17N9A-WoSSw" YouTube)
- ("Dark Sominium" "https://www.youtube.com/feeds/videos.xml?channel_id=UC_e39rWdkQqo5-LbiLiU10g" YouTube Stories)
- ("Dark Sominium Music" "https://www.youtube.com/feeds/videos.xml?channel_id=UCkLiZ_zLynyNd5fd62hg1Kw" YouTube Music)
- ("Nexpo" "https://www.youtube.com/feeds/videos.xml?channel_id=UCpFFItkfZz1qz5PpHpqzYBw" YouTube)
- ("Techquickie" "https://www.youtube.com/feeds/videos.xml?channel_id=UC0vBXGSyV14uvJ4hECDOl0Q" YouTube)
- ("3B1B" "https://www.youtube.com/feeds/videos.xml?channel_id=UCYO_jab_esuFRV4b17AJtAw" YouTube)))
-
-
-(when (featurep! +elfeed)
- (after! elfeed
- (setq elfeed-feeds (cl-map 'list (lambda (item) (append (list (nth 1 item)) (cdr (cdr item)))) +rss/feed-urls))))
-
-(when (featurep! +newsticker)
- (defun +rss/set-feed-urls (LIST)
- "Set the newsticker-url-list to LIST. LIST should have format =(TAG URL START_TIME INTERVAL)="
- (setq newsticker-url-list LIST))
-
- (defun +rss/get-newsticker-buffers ()
- "Using seq, filter the buffer list for newsticker buffers"
- (seq-remove (lambda (buffer)
- (not (and (cl-search "*Newsticker" (buffer-name buffer))
- (= (cl-search "*Newsticker" (buffer-name buffer))))))
- (buffer-list)))
-
- (defun +rss/close-newsticker()
- "Routine to close the newsticker system"
- (interactive)
- (newsticker-stop)
- (dolist (buf (+rss/get-newsticker-buffers))
- (kill-buffer buf))
- (+workspace/delete "RSS"))
-
- (use-package! newsticker
- :config
- (+rss/set-feed-urls ; Format is =(TAG URL START_TIME INTERVAL)=
- (cl-map 'list (lambda (item) (list (nth 0 item) (nth 1 item) nil 3600)) +rss/feed-urls))
-
- (defun +rss/open-newsticker ()
- "Routine to start and open the newsticker"
- (interactive)
- (newsticker-start)
- (+workspace/new "RSS")
- (newsticker-treeview))))