Updated :todo ex command to accept ! option to search current file

emacs/.emacs.d/README.org

@@ -1555,10 +1555,6 @@ Shows hex colors inline.
     :init
     (use-package smex)
     (use-package counsel)
-    (use-package doom-todo-ivy
-      :ensure nil
-      :config
-      (evil-ex-define-cmd "todo" 'doom/ivy-tasks))
     :config
     (setq ivy-re-builders-alist
           '((t . ivy--regex-ignore-order)))
@@ -1572,6 +1568,15 @@ Shows hex colors inline.
          (ivy-call)
          (ivy-shrink-after-dispatching)))
 
+    (use-package doom-todo-ivy
+      :ensure nil
+      :config
+      (evil-define-command doom/ivy-tasks-ex (&optional bang)
+        "An ex wrapper around `doom/ivy-tasks'."
+        (interactive "<!>")
+        (doom/ivy-tasks bang))
+      (evil-ex-define-cmd "todo" 'doom/ivy-tasks-ex))
+
     (eval-after-load "hydra" (use-package ivy-hydra)))
 #+END_SRC
 
@@ -1631,74 +1636,37 @@ On the fly syntax checking
 ** Email
 
 #+BEGIN_SRC emacs-lisp :tangle yes
-  (when (require 'mu4e nil 'noerror)
-    (setq mu4e-msg2pdf "/usr/bin/msg2pdf")
-    (setq
-     ;; set mu4e as default mail client
-     mail-user-agent 'mu4e-user-agent
-     ;; root mail directory - can't be switched
-     ;; with context, can only be set once
-     mu4e-maildir "~/.mail"
-     mu4e-attachments-dir "~/Downloads/Attachments"
-     ;; update command
-     mu4e-get-mail-command "mbsync -q -a"
-     ;; update database every seven minutes
-     mu4e-update-interval (* 60 7)
-     ;; use smtpmail (bundled with emacs) for sending
-     message-send-mail-function 'smtpmail-send-it
-     ;; optionally log smtp output to a buffer
-     smtpmail-debug-info t
-     ;; close sent message buffers
-     message-kill-buffer-on-exit t
-     ;; customize list columns
-     mu4e-headers-fields '((:flags . 4)
-                           (:from . 20)
-                           (:human-date . 10)
-                           (:subject))
-     ;; for mbsync
-     mu4e-change-filenames-when-moving t
-     ;; pick first context automatically on launch
-     mu4e-context-policy               'pick-first
-     ;; use current context for new mail
-     mu4e-compose-context-policy       nil
-     mu4e-confirm-quit                 nil)
-
-    (global-set-key (kbd "<f12>") 'mu4e)
-    (global-set-key (kbd "<C-f12>") 'mu4e-update-mail-and-index)
-
-    (setq mu4e-contexts
-          `(,(make-mu4e-context
-              :name "gmail"
-              :match-func (lambda(msg)
-                            (when msg
-                              (mu4e-message-contact-field-matches msg :to "@gmail.com")))
-              :vars '(
-                      ;; local directories, relative to mail root
-                      (mu4e-sent-folder . "/gmail/[Gmail]/.Sent Mail")
-                      (mu4e-drafts-folder . "/gmail/[Gmail]/.Drafts")
-                      (mu4e-trash-folder . "/gmail/[Gmail]/.Trash")
-                      (mu4e-refile-folder . "/gmail/[Gmail]/.All Mail")
-                      ;; account details
-                      (user-mail-address . "joshuafwolfe@gmail.com")
-                      (user-full-name . "Josh Wolfe")
-                      (mu4e-user-mail-address-list . ( "@gmail.com" ))
-                      ;; gmail saves every outgoing message automatically
-                      (mu4e-sent-messages-behavior . delete)
-                      (mu4e-maildir-shortcuts . (("/gmail/INBOX" . ?j)
-                                                 ("/gmail/[Gmail]/.All Mail" . ?a)
-                                                 ("/gmail/[Gmail]/.Trash" . ?t)
-                                                 ("/gmail/[Gmail]/.Drafts" . ?d)))
-                      ;; outbound mail server
-                      (smtpmail-smtp-server . "smtp.gmail.com")
-                      ;; outbound mail port
-                      (smtpmail-smtp-service . 465)
-                      ;; use ssl
-                      (smtpmail-stream-type . ssl)
-                      ;; the All Mail folder has a copy of every other folder's contents,
-                      ;; and duplicates search results, which is confusing
-                      (mue4e-headers-skip-duplicates . t)))))
-
-    (use-package evil-mu4e))
+  (require 'epa-file)
+  (custom-set-variables '(epg-gpg-program  "c:/Program Files (x86)/GNU/GnuPG/pub/gpg2"))
+  (epa-file-enable)
+
+  (require 'gnus)
+  (setq user-mail-address "joshuafwolfe@gmail.com"
+        user-full-name "Josh Wolfe")
+
+  (setq gnus-select-method
+        '(nnimap "gmail"
+           (nnimap-address "imap.gmail.com")
+           (nnimap-server-port 993)
+           (nnimap-stream ssl)))
+
+  (setq smtpmail-smtp-server "smtp.gmail.com"
+        smtpmail-smtp-service 587
+        gnus-ignored-newsgroups "^to\\.\\|^[0-9. ]+\\( \\|$\\)\\|^[\"]\"[#'()]")
+
+  (setq gnus-thread-sort-functions
+        '(gnus-thread-sort-by-most-recent-date
+          (not gnus-thread-sort-by-number)))
+
+  (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)
+
 #+END_SRC
 
 ** IRC