From 811dbc4e68e24dc0520fd00ece017715ef68255e Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Mon, 25 Nov 2019 16:20:53 -0500 Subject: [PATCH] app/write: conform hooks to conventions --- modules/app/write/autoload.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/modules/app/write/autoload.el b/modules/app/write/autoload.el index 8a2f21044..f1fa84601 100644 --- a/modules/app/write/autoload.el +++ b/modules/app/write/autoload.el @@ -16,28 +16,28 @@ (setq-local line-spacing +write-line-spacing))) ;;;###autoload -(defun +write|init-org-mode () +(defun +write-init-org-mode-h () "Initializes `org-mode' specific settings for `+write-mode'." (when (eq major-mode 'org-mode) (+org-pretty-mode (if +write-mode +1 -1)))) ;;;###autoload -(defun +write|init-line-numbers () +(defun +write-init-line-numbers-h () (display-line-numbers-mode (if +write-mode +1 -1))) ;;;###autoload -(defun +write|init-mixed-pitch () +(defun +write-init-mixed-pitch-h () (mixed-pitch-mode (if +write-mode +1 -1))) ;;;###autoload -(defun +write|init-visual-fill-column () +(defun +write-init-visual-fill-column-h () (visual-fill-column-mode (if +write-mode +1 -1))) ;;;###autoload (add-hook! '+write-mode-hook #'(flyspell-mode visual-line-mode - +write|init-mixed-pitch - +write|init-visual-fill-column - +write|init-line-numbers - +write|init-org-mode)) + +write-init-mixed-pitch-h + +write-init-visual-fill-column-h + +write-init-line-numbers-h + +write-init-org-mode-h))