gnus: conditional mail setup based on hostname

[~bandali/configs] / .emacs.d / init.el

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 47c254a..781b7f0 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -451,12 +451,13 @@ This sets each user option VAR's value to the corresponding VALUE.
   (with-eval-after-load 'faces
     (let* ((grey "#e7e7e7")
            (darker-grey "#d9d9d9")
-           (box ;; `(:line-width -1 :style released-button)
-            'unspecified))
+           (box ;; 'unspecified
+                `(:line-width -1 :style released-button)))
       (set-face-attribute 'mode-line nil
                           :background grey :box box)
-      (set-face-attribute 'mode-line-inactive nil
-                          :background darker-grey :box box))))
+      ;; (set-face-attribute 'mode-line-inactive nil
+      ;;                     :background darker-grey :box box)
+      )))
 
 \f
 ;;; Useful utilities
@@ -644,9 +645,12 @@ Make N (default: 1) copies of the current line or region."
 
 (csetq shr-max-width 80)
 
-;; Email (with Gnus and message)
+;; Email (with Gnus, message, and smtpmail)
 (require 'bandali-gnus)
 (require 'bandali-message)
+;; (with-eval-after-load 'smtpmail
+;;   (csetq smtpmail-queue-mail t
+;;          smtpmail-queue-dir (concat b/maildir "queue/")))
 
 ;; IRC (with ERC)
 (require 'bandali-erc)
@@ -967,6 +971,9 @@ Make N (default: 1) copies of the current line or region."
   (delight 'mml-mode " mml" "mml")
   (delight 'yas-minor-mode "" "yasnippet"))
 
+;; po-mode
+(require 'bandali-po)
+
 \f
 ;;; Post initialization