home

commit 5cb676775629fd8d6a87b294cc18e3b9e17c5a54
parent 3e3362b0d32e2af4f6941cf956e0d27fa8315aa4
Author: Vincent Demeester <vincent@sbr.pm>
Date:   Tue,  7 Apr 2020 18:49:18 +0200

config-completion.el: company specific on org …

… and message modes

Signed-off-by: Vincent Demeester <vincent@sbr.pm>

Diffstat:
M
tools/emacs/config/config-completion.el
 | 
5
++---
M
tools/emacs/config/config-mails.el
 | 
8
+++++++-
M
tools/emacs/config/config-org.el
 | 
3
+++

3 files changed, 12 insertions(+), 4 deletions(-)
diff --git a/tools/emacs/config/config-completion.el b/tools/emacs/config/config-completion.el
@@ -236,8 +236,7 @@ Otherwise, use `projectile-switch-to-project'."
 ;; Same for clang, cmake or xcode, elisp
 
 (use-package company-emoji
-  :hook ((org-mode . my-company-emoji)
-         (markdown-mode . my-company-emoji))
+  :hook ((markdown-mode . my-company-emoji))
   :config
   (defun my-company-emoji ()
     (set (make-local-variable 'company-backends) '(company-emoji))
@@ -245,7 +244,7 @@ Otherwise, use `projectile-switch-to-project'."
 
 ;; -UseCompany
 
-
+;; Deprecated for now
 (use-package ivy
   :disabled
   :bind (("C-x B" . ivy-switch-buffer)
diff --git a/tools/emacs/config/config-mails.el b/tools/emacs/config/config-mails.el
@@ -40,6 +40,7 @@
 ;; MessageCfg
 (use-package message
   :commands (message-mode message-cite-original-without-signature)
+  :hook ((message-mode . my-message-hook))
   :config
   (setq mail-user-agent 'message-user-agent
         message-wide-reply-confirm-recipients t
@@ -48,7 +49,12 @@
         message-kill-buffer-on-exit t
         message-generate-headers-first t)
   (add-to-list 'mm-body-charset-encoding-alist '(utf-8 . base64))
-  (add-hook 'message-mode-hook 'turn-on-auto-fill))
+  (defun my-message-hook ()
+    "Message mode hook."
+    (turn-on-auto-fill)
+    (set (make-local-variable 'company-backends)
+         '(company-emoji company-capf company-files company-dabbrev))
+    (company-mode 1)))
 ;; -MessageCfg
 
 ;; Notmuch
diff --git a/tools/emacs/config/config-org.el b/tools/emacs/config/config-org.el
@@ -112,6 +112,9 @@
     (auto-revert-mode)
     (auto-fill-mode)
     (org-indent-mode)
+    (set (make-local-variable 'company-backends)
+         '(company-emoji company-capf company-files company-dabbrev))
+    (company-mode 1)
     (add-hook 'after-save-hook #'save-and-update-includes nil 'make-it-local)))
 ;; -OrgHook