Use gnus

2017-03-14 15:59:06 +01:00
parent 14628a7444
commit 59bffd0b29
3 changed files with 15 additions and 2 deletions
--- a/my-setkeys.el
+++ b/my-setkeys.el
@@ -27,3 +27,12 @@

 (global-set-key [(control next)] 'gcm-scroll-down)
 (global-set-key [(control prior)]   'gcm-scroll-up)
+
+(defun my-gnus-group-list-subscribed-groups ()
+  "List all subscribed groups with or without un-read messages"
+  (interactive)
+  (gnus-group-list-all-groups 5))
+
+(define-key gnus-group-mode-map
+  ;; list all the subscribed groups even they contain zero un-read messages
+  (kbd "o") 'my-gnus-group-list-subscribed-groups)