09cb4f6716
Now that we are loading package autoloads files (as part of the generated doom-package-autoload-file when running make autoloads), many :commands properties are redundant. In fact, many def-package! blocks are redundant. In some cases, we can do without a config.el file entirely, and can move into the autoloads file or rely entirely on package autoloads. Also, many settings have been moved in their module's autoloads files, which makes them available ASAP; their use no longer depends on module load order. This gained me a modest ~10% boost in startup speed.
38 lines
1.3 KiB
EmacsLisp
38 lines
1.3 KiB
EmacsLisp
;;; tools/electric-indent/config.el -*- lexical-binding: t; -*-
|
|
|
|
;; Smarter, keyword-based electric-indent
|
|
|
|
(defvar doom-electric-indent-p nil
|
|
"TODO")
|
|
|
|
(defvar-local doom-electric-indent-words '()
|
|
"TODO")
|
|
|
|
(def-setting! :electric (modes &rest plist)
|
|
"Declare :words (list of strings) or :chars (lists of chars) in MODES that
|
|
trigger electric indentation."
|
|
(declare (indent 1))
|
|
(let ((modes (doom-enlist (doom-unquote modes)))
|
|
(chars (doom-unquote (plist-get plist :chars)))
|
|
(words (doom-unquote (plist-get plist :words))))
|
|
(when (or chars words)
|
|
(let ((fn-name (intern (format "doom--init-electric-%s" (mapconcat #'symbol-name modes "-")))))
|
|
`(progn
|
|
(defun ,fn-name ()
|
|
(electric-indent-local-mode +1)
|
|
,@(if chars `((setq electric-indent-chars ',chars)))
|
|
,@(if words `((setq doom-electric-indent-words ',words))))
|
|
(add-hook! ,modes #',fn-name))))))
|
|
|
|
;;
|
|
(after! electric
|
|
(setq-default electric-indent-chars '(?\n ?\^?))
|
|
|
|
(defun +electric-indent|char (_c)
|
|
(when (and (eolp) doom-electric-indent-words)
|
|
(save-excursion
|
|
(backward-word)
|
|
(looking-at-p
|
|
(concat "\\<" (regexp-opt doom-electric-indent-words))))))
|
|
(add-to-list 'electric-indent-functions #'+electric-indent|char))
|
|
|