Fix indentation for many autodef setters
This commit is contained in:
parent
22c145105d
commit
5531d7115a
9 changed files with 9 additions and 3 deletions
|
@ -17,6 +17,7 @@ Examples:
|
|||
(set-company-backend! 'js2-mode
|
||||
'(:separate company-irony-c-headers company-irony))
|
||||
(set-company-backend! 'sh-mode nil)"
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((hook (intern (format "%s-hook" mode)))
|
||||
(fn (intern (format "+company|init-%s" mode))))
|
||||
|
|
|
@ -8,7 +8,7 @@
|
|||
(cl-defun set-rotate-patterns! (modes &key symbols words patterns)
|
||||
"Declare :symbols, :words or :patterns (all lists of strings) that
|
||||
`rotate-text' will cycle through."
|
||||
(declare (indent 1))
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((fn-name (intern (format "+rotate-text|init-%s" mode))))
|
||||
(fset fn-name
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
(defun set-electric! (modes &rest plist)
|
||||
"Declare :words (list of strings) or :chars (lists of chars) in MODES that
|
||||
trigger electric indentation."
|
||||
(declare (indent 1))
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((hook (intern (format "%s-hook" mode)))
|
||||
(fn (intern (format "+electric|init-%s" mode))))
|
||||
|
|
|
@ -42,6 +42,7 @@ function that creates and returns the REPL buffer."
|
|||
(quickrun-add-command MODE COMMAND :mode MODE).
|
||||
4. If MODE is not a string and COMMANd is a symbol, add it to
|
||||
`+eval-runners', which is used by `+eval/region'."
|
||||
(declare (indent defun))
|
||||
(cond ((symbolp command)
|
||||
(push (cons mode command) +eval-runners))
|
||||
((stringp command)
|
||||
|
|
|
@ -4,6 +4,7 @@
|
|||
;;;###autodef
|
||||
(defun set-evil-initial-state! (modes state)
|
||||
"Set the initialize STATE of MODES using `evil-set-initial-state'."
|
||||
(declare (indent defun))
|
||||
(after! evil
|
||||
(if (listp modes)
|
||||
(dolist (mode (doom-enlist modes))
|
||||
|
|
|
@ -27,6 +27,7 @@ these properties:
|
|||
:ignore BOOL
|
||||
If non-nil, don't expand any template for this file and don't test any other
|
||||
file template rule against this buffer."
|
||||
(declare (indent defun))
|
||||
(after! (:when (boundp '+file-templates-alist))
|
||||
(+file-templates--set pred plist)))
|
||||
|
||||
|
|
|
@ -13,6 +13,7 @@
|
|||
symbol or a list of them).
|
||||
|
||||
Used by `+lookup/in-docsets' and `+lookup/documentation'."
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((fn (intern (format "+lookup|init-docsets--%s" mode)))
|
||||
(hook (intern (format "%s-hook" mode))))
|
||||
|
|
|
@ -29,6 +29,7 @@ properties:
|
|||
:xref-backend FN
|
||||
Defines an xref backend for a major-mode. If you define :definition and
|
||||
:references along with :xref-backend, those will have higher precedence."
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((hook (intern (format "%s-hook" mode)))
|
||||
(fn (intern (format "+lookup|init-%s" mode))))
|
||||
|
|
|
@ -319,7 +319,7 @@ assicated with :lambda in `+pretty-code-symbols'.
|
|||
Pretty symbols can be unset for emacs-lisp-mode with:
|
||||
|
||||
(set-pretty-symbols! 'emacs-lisp-mode nil)"
|
||||
(declare (indent 1))
|
||||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((hook (intern (format "%s-hook" mode)))
|
||||
(fn (intern (format "+pretty-code|init-%s" mode))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue