From de6752858aa1355dda396256e1339d9f6bc51cae Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sun, 13 Dec 2020 20:56:08 -0600
Subject: Update README

---
 README.md | 59 ++++++++++++++++++++++++++++++++++++++++++++++-------------
 1 file changed, 46 insertions(+), 13 deletions(-)

(limited to 'README.md')

diff --git a/README.md b/README.md
index a4edfdd..1a6f121 100644
--- a/README.md
+++ b/README.md
@@ -1022,22 +1022,55 @@ from [unpackaged.el](https://github.com/alphapapa/unpackaged.el#ensure-blank-lin
       (0x0-default-service 'ttm))
 
 
-## Elfeed
+## RSS
 
-inspired by ["Lazy Elfeed"](https://karthinks.com/software/lazy-elfeed/).
-
-    (use-package elfeed
-      :when (executable-find "curl")
+    (use-package newsticker
+      :custom
+      (newsticker-url-list
+       ;; LABEL URL [START-TIME] [INERVAL] [WGET-ARGUMENTS]
+       '(("wsinatra" "http://lambdacreate.com/static/feed.rss")
+         ("elioat" "https://eli.li/feed.rss")
+         ("ACDW" "https://www.acdw.net/atom.xml")
+         ("june" "https://text.causal.agency/feed.atom")
+         ("kylie - notes" "https://www.somas.is/notes.atom")
+         ("kylie - rhizome" "https://www.somas.is/rhizome.atom")
+         ("brennan" "https://p1k3.com/all.xml")
+         ("Planet Emacs" "https://planet.emacslife.com/atom.xml") 
+         ("nullprogram, Chris Wellons" "https://nullprogram.com/feed/")
+         ("Malleable Systems" "https://malleable.systems/blog/index.xml"))
+       )
       :hook
-      (elfeed-show-mode-hook . visual-fill-column-mode))
+      (newsticker-treeview-item-mode-hook . visual-fill-column-mode))
+
+
+## Web browsing
+
+
+### Open youtube links in mpv
+
+from [karthinks](https://karthinks.com/software/more-batteries-included-with-emacs/#regexp-builder--m-x-re-builder).
+
+    (require 'browse-url)
     
-    (use-package elfeed-org
-      :custom
-      (rmh-elfeed-org-files
-       (list (expand-file-name "elfeed.org"
-    			   user-emacs-directory)))
-      :init
-      (elfeed-org))
+    (when (executable-find "mpv")
+      (defun browse-url-mpv (url &optional single)
+        (start-process "mpv" nil (if single "mpv" "umpv")
+    		   (shell-quote-wildcard-pattern url)))
+    
+      (defun browse-url-at-point-mpv (&optional single)
+        "Open a link in mpv."
+        (interactive "P")
+        (let ((browse-url-browser-function
+    	   (if single
+    	       (lambda
+    		 (url &optional _new-window)
+    		 (browse-url-mpv url t))
+    	     #'browse-url-mpv)))
+          (browse-url-at-point)))
+    
+      (cuss browse-url-browser-function
+    	'(("https?:\\/\\/www\\.youtu\\.*be." . browse-url-mpv)
+    	  ("." . browse-url-generic))))
 
 
 # Appendices
-- 
cgit 1.4.1-21-gabe81