summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--README.md59
1 files changed, 46 insertions, 13 deletions
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
1022 (0x0-default-service 'ttm)) 1022 (0x0-default-service 'ttm))
1023 1023
1024 1024
1025## Elfeed 1025## RSS
1026 1026
1027inspired by ["Lazy Elfeed"](https://karthinks.com/software/lazy-elfeed/). 1027 (use-package newsticker
1028 1028 :custom
1029 (use-package elfeed 1029 (newsticker-url-list
1030 :when (executable-find "curl") 1030 ;; LABEL URL [START-TIME] [INERVAL] [WGET-ARGUMENTS]
1031 '(("wsinatra" "http://lambdacreate.com/static/feed.rss")
1032 ("elioat" "https://eli.li/feed.rss")
1033 ("ACDW" "https://www.acdw.net/atom.xml")
1034 ("june" "https://text.causal.agency/feed.atom")
1035 ("kylie - notes" "https://www.somas.is/notes.atom")
1036 ("kylie - rhizome" "https://www.somas.is/rhizome.atom")
1037 ("brennan" "https://p1k3.com/all.xml")
1038 ("Planet Emacs" "https://planet.emacslife.com/atom.xml")
1039 ("nullprogram, Chris Wellons" "https://nullprogram.com/feed/")
1040 ("Malleable Systems" "https://malleable.systems/blog/index.xml"))
1041 )
1031 :hook 1042 :hook
1032 (elfeed-show-mode-hook . visual-fill-column-mode)) 1043 (newsticker-treeview-item-mode-hook . visual-fill-column-mode))
1044
1045
1046## Web browsing
1047
1048
1049### Open youtube links in mpv
1050
1051from [karthinks](https://karthinks.com/software/more-batteries-included-with-emacs/#regexp-builder--m-x-re-builder).
1052
1053 (require 'browse-url)
1033 1054
1034 (use-package elfeed-org 1055 (when (executable-find "mpv")
1035 :custom 1056 (defun browse-url-mpv (url &optional single)
1036 (rmh-elfeed-org-files 1057 (start-process "mpv" nil (if single "mpv" "umpv")
1037 (list (expand-file-name "elfeed.org" 1058 (shell-quote-wildcard-pattern url)))
1038 user-emacs-directory))) 1059
1039 :init 1060 (defun browse-url-at-point-mpv (&optional single)
1040 (elfeed-org)) 1061 "Open a link in mpv."
1062 (interactive "P")
1063 (let ((browse-url-browser-function
1064 (if single
1065 (lambda
1066 (url &optional _new-window)
1067 (browse-url-mpv url t))
1068 #'browse-url-mpv)))
1069 (browse-url-at-point)))
1070
1071 (cuss browse-url-browser-function
1072 '(("https?:\\/\\/www\\.youtu\\.*be." . browse-url-mpv)
1073 ("." . browse-url-generic))))
1041 1074
1042 1075
1043# Appendices 1076# Appendices