Refactor set-electric! #4031
This commit is contained in:
parent
81f325f169
commit
7baeb20ac9
1 changed files with 9 additions and 9 deletions
|
@ -11,16 +11,16 @@ Enables `electric-indent-local-mode' in MODES.
|
|||
(declare (indent defun))
|
||||
(dolist (mode (doom-enlist modes))
|
||||
(let ((hook (intern (format "%s-hook" mode)))
|
||||
(fn (intern (format "+electric|init-%s" mode))))
|
||||
(fn (intern (format "+electric--init-%s-h" mode))))
|
||||
(cond ((null (car-safe plist))
|
||||
(remove-hook hook fn)
|
||||
(unintern fn nil))
|
||||
((fset fn
|
||||
(lambda ()
|
||||
((fset
|
||||
fn (lambda ()
|
||||
(when (eq major-mode mode)
|
||||
(setq-local electric-indent-inhibit nil)
|
||||
(cl-destructuring-bind (&key chars words) plist
|
||||
(electric-indent-local-mode +1)
|
||||
(if chars (setq electric-indent-chars chars))
|
||||
(if chars (setq-local electric-indent-chars chars))
|
||||
(if words (setq +electric-indent-words words))))))
|
||||
(add-hook hook fn))))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue