summary refs log tree commit diff
path: root/emacs/custom/my-elfeed.el
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--emacs/custom/my-elfeed.el48
1 files changed, 0 insertions, 48 deletions
diff --git a/emacs/custom/my-elfeed.el b/emacs/custom/my-elfeed.el
deleted file mode 100644
index a9ce043..0000000
--- a/emacs/custom/my-elfeed.el
+++ /dev/null
@@ -1,48 +0,0 @@
-;;; my-elfeed.el --- Configure elfeed -*- lexical-binding: t -*-
-
-;;; Commentary:
-
-;;; Code:
-
-(require 'elfeed)
-(require 'elfeed-org)
-
-(with-eval-after-load 'elfeed-search
-  '(define-key elfeed-search-mode-map (kbd "*") 'elfeed-toggle-star))
-
-(add-hook 'after-init-hook 'elfeed-org)
-
-(customize-set-variable 'elfeed-search-filter "@1-month-ago +unread")
-(customize-set-variable 'rmh-elfeed-org-files (list (expand-file-name "etc/elfeed.org" user-emacs-directory)))
-
-(defalias 'elfeed-toggle-star
-  (elfeed-expose #'elfeed-search-toggle-all 'star))
-
-;; set colors for some specific tags
-(defface elfeed-face-tag-mustread
-  '((t :foreground "#f00"))
-  "This is a custom font face for the `mustread' tag in Elfeed."
-  :group 'elfeed)
-
-(with-eval-after-load 'elfeed
-  (setq elfeed-search-face-alist
-        '((mustread elfeed-face-tag-mustread)
-          (unread elfeed-search-unread-title-face))))
-
-(defun my/elfeed-show-visit-eww ()
-  "Visit the current entry in eww."
-  (interactive)
-  (let ((link (elfeed-entry-link elfeed-show-entry)))
-    (when link
-      (eww link))))
-
-;; disable proportional fonts when displaying HTML content.
-(advice-add #'elfeed-insert-html
-              :around
-              (lambda (fun &rest r)
-                (let ((shr-use-fonts nil))
-                  (apply fun r))))
-
-(provide 'my-elfeed)
-
-;;; my-elfeed.el ends here