From 86a5b55e66648f79a835e3ebd295483359b9a4a8 Mon Sep 17 00:00:00 2001 From: Guangxiong Lin Date: Tue, 19 Apr 2022 22:59:58 +0800 Subject: Add hook to after-init-hook by order I cannot use emacs without evil-mode ... Load it first to avoid any issue occurs during initialization. --- .emacs.d/init.el | 3 ++- .emacs.d/lisp/init-appearance.el | 2 +- .emacs.d/lisp/init-company.el | 2 +- .emacs.d/lisp/init-evil.el | 2 +- .emacs.d/lisp/init-git.el | 2 +- .emacs.d/lisp/init-input-method.el | 2 +- .emacs.d/lisp/init-minibuffer.el | 4 ++-- .emacs.d/lisp/init-misc.el | 7 ++++--- .emacs.d/lisp/init-projectile.el | 2 +- 9 files changed, 14 insertions(+), 12 deletions(-) (limited to '.emacs.d') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index b52f599..a0ba982 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -41,7 +41,8 @@ (add-hook 'after-init-hook (lambda () (require 'server) - (unless (server-running-p) (server-start)))) + (unless (server-running-p) (server-start))) + 'append) (load custom-file) diff --git a/.emacs.d/lisp/init-appearance.el b/.emacs.d/lisp/init-appearance.el index 39d38b4..eac5e1e 100644 --- a/.emacs.d/lisp/init-appearance.el +++ b/.emacs.d/lisp/init-appearance.el @@ -21,7 +21,7 @@ (add-to-list 'after-make-frame-functions #'gx/set-appearance-for-frame) -(add-hook 'after-init-hook #'gx/set-appearance) +(add-hook 'after-init-hook #'gx/set-appearance 'append) (setq-default custom-safe-themes t) diff --git a/.emacs.d/lisp/init-company.el b/.emacs.d/lisp/init-company.el index 1f7a097..863e66e 100644 --- a/.emacs.d/lisp/init-company.el +++ b/.emacs.d/lisp/init-company.el @@ -1,6 +1,6 @@ (when (gx/maybe-require-package 'company) (when (not (display-graphic-p)) - (add-hook 'after-init-hook 'global-company-mode))) + (add-hook 'after-init-hook 'global-company-mode 'append))) (with-eval-after-load 'company (company-tng-configure-default) diff --git a/.emacs.d/lisp/init-evil.el b/.emacs.d/lisp/init-evil.el index 0539784..78c5bfc 100644 --- a/.emacs.d/lisp/init-evil.el +++ b/.emacs.d/lisp/init-evil.el @@ -1,5 +1,5 @@ (when (gx/maybe-require-package 'evil) - (add-hook 'after-init-hook (lambda () (evil-mode 1)))) + (add-hook 'after-init-hook (lambda () (evil-mode 1)) 'append)) (setq evil-want-integration t evil-want-C-u-scroll t diff --git a/.emacs.d/lisp/init-git.el b/.emacs.d/lisp/init-git.el index fa8e734..c47dcf9 100644 --- a/.emacs.d/lisp/init-git.el +++ b/.emacs.d/lisp/init-git.el @@ -7,7 +7,7 @@ (setq magit-refresh-status-buffer nil) (when (gx/maybe-require-package 'git-gutter) - (add-hook 'after-init-hook 'global-git-gutter-mode)) + (add-hook 'after-init-hook 'global-git-gutter-mode 'append)) (with-eval-after-load 'git-gutter (gx/diminish 'git-gutter-mode)) diff --git a/.emacs.d/lisp/init-input-method.el b/.emacs.d/lisp/init-input-method.el index 11fcb78..81f6d89 100644 --- a/.emacs.d/lisp/init-input-method.el +++ b/.emacs.d/lisp/init-input-method.el @@ -1,7 +1,7 @@ (when *is-a-linux* (setq fcitx-remote-command "fcitx5-remote") (when (gx/maybe-require-package 'fcitx) - (add-hook 'after-init-hook 'fcitx-aggressive-setup))) + (add-hook 'after-init-hook 'fcitx-aggressive-setup 'append))) (when *is-a-mac* (setq sis-external-ism "/usr/local/bin/macism") diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el index fc62cc1..81030cd 100644 --- a/.emacs.d/lisp/init-minibuffer.el +++ b/.emacs.d/lisp/init-minibuffer.el @@ -1,7 +1,7 @@ ;; -*- lexical-binding: t -*- (when (gx/maybe-require-package 'vertico) - (add-hook 'after-init-hook #'vertico-mode)) + (add-hook 'after-init-hook #'vertico-mode 'append)) (setq vertico-resize t vertico-count 20 @@ -63,6 +63,6 @@ (setq consult-preview-key (kbd "C-c C-p")) (when (gx/maybe-require-package 'savehist) - (add-hook 'after-init-hook #'savehist-mode)) + (add-hook 'after-init-hook #'savehist-mode 'append)) (provide 'init-minibuffer) diff --git a/.emacs.d/lisp/init-misc.el b/.emacs.d/lisp/init-misc.el index 31d2358..aab95f7 100644 --- a/.emacs.d/lisp/init-misc.el +++ b/.emacs.d/lisp/init-misc.el @@ -43,7 +43,8 @@ (global-so-long-mode 1) (recentf-mode) (show-paren-mode) - (fset 'yes-or-no-p 'y-or-n-p))) + (fset 'yes-or-no-p 'y-or-n-p)) + 'append) (with-eval-after-load 'hideshow (gx/diminish 'hs-minor-mode)) @@ -54,13 +55,13 @@ (when (gx/maybe-require-package 'which-key) (autoload 'which-key-mode "which-key") - (add-hook 'after-init-hook 'which-key-mode)) + (add-hook 'after-init-hook 'which-key-mode 'append)) (with-eval-after-load 'which-key (gx/diminish 'which-key-mode)) (when (gx/maybe-require-package 'undo-tree) (autoload 'global-undo-tree-mode "undo-tree") - (add-hook 'after-init-hook 'global-undo-tree-mode)) + (add-hook 'after-init-hook 'global-undo-tree-mode 'append)) (with-eval-after-load 'undo-tree (gx/diminish 'undo-tree-mode)) (setq undo-tree-auto-save-history t diff --git a/.emacs.d/lisp/init-projectile.el b/.emacs.d/lisp/init-projectile.el index 4169387..f9137a7 100644 --- a/.emacs.d/lisp/init-projectile.el +++ b/.emacs.d/lisp/init-projectile.el @@ -1,5 +1,5 @@ (when (gx/maybe-require-package 'projectile) - (add-hook 'after-init-hook #'projectile-mode)) + (add-hook 'after-init-hook #'projectile-mode 'append)) (with-eval-after-load 'projectile (gx/diminish 'projectile-mode)) -- cgit v1.2.3