[emacs] abbrev in text-mode, default fill-column in message-mode

[~bandali/configs] / init.org

diff --git a/init.org b/init.org
index c0cd733..d3af370 100644 (file)
--- a/init.org
+++ b/init.org
@@ -1259,7 +1259,8 @@ TODO: break this giant source block down into individual org sections.
   :config (column-number-mode))
 
 (progn ;    `text-mode'
-  (add-hook 'text-mode-hook #'indicate-buffer-boundaries-left))
+  (add-hook 'text-mode-hook #'indicate-buffer-boundaries-left)
+  (add-hook 'text-mode-hook #'abbrev-mode))
 
 (use-package tramp
   :defer t
@@ -2279,8 +2280,8 @@ For when I /have to/ use GH.
   :hook (;; (message-setup . mml-secure-message-sign-pgpmime)
          (message-mode . flyspell-mode)
          (message-mode . (lambda ()
-                           (setq fill-column 65
-                                 message-fill-column 65)
+                           ;; (setq fill-column 65
+                           ;;       message-fill-column 65)
                            (make-local-variable 'company-idle-delay)
                            (setq company-idle-delay 0.2))))
   ;; :custom-face
@@ -2345,9 +2346,10 @@ I tried using =borg-elpa= instead of doing it like this, but it added
   :load-path "lisp/bbdb"
   :init
   (load (expand-file-name "lisp/bbdb/bbdb-autoloads.el" user-emacs-directory))
-  (bbdb-mua-auto-update-init 'message)
-  (setq bbdb-mua-auto-update-p 'query)
-  (add-hook 'gnus-startup-hook 'bbdb-insinuate-gnus))
+  ;; (bbdb-mua-auto-update-init 'message)
+  (setq bbdb-mua-auto-update-p 'query
+        bbdb-complete-mail nil)
+  (bbdb-initialize 'gnus 'message))
 #+end_src
 
 ** COMMENT message-x