From b13ec3c8fcc04c7596f88597c6e11463ee4da0ea Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Sun, 13 Nov 2016 01:27:48 -0500
Subject: Add elfeed-default-filter command

---
 init.el           | 1 +
 lisp/km-elfeed.el | 5 +++++
 2 files changed, 6 insertions(+)

diff --git a/init.el b/init.el
index ddf01bc..4b98762 100644
--- a/init.el
+++ b/init.el
@@ -2064,6 +2064,7 @@
   :init
   (after 'elfeed
     (bind-keys :map elfeed-search-mode-map
+               ("d" . km/elfeed-default-filter)
                ("t" . km/elfeed-set-tag))))
 
 
diff --git a/lisp/km-elfeed.el b/lisp/km-elfeed.el
index 0e67e01..bea17c1 100644
--- a/lisp/km-elfeed.el
+++ b/lisp/km-elfeed.el
@@ -51,5 +51,10 @@ filter to the default, respectively."
                     (format " +%s"
                             (cdr (assq tag-key km/elfeed-tag-keys)))))))))
 
+;;;###autoload
+(defun km/elfeed-default-filter ()
+  (interactive)
+  (elfeed-search-set-filter (default-value 'elfeed-search-filter)))
+
 (provide 'km-elfeed)
 ;;; km-elfeed.el ends here
-- 
cgit v1.2.3