emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Replace :electric with set-electric-rules!

Browse source 
And general refactor of the emacs/electric-indent module.

Also updates (set! :electric ...) references in various :lang modules
This commit is contained in:
Henrik Lissner 2018-06-15 12:30:56 +02:00
parent f801939ce7
commit 9f0ebe42e8
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
9 changed files with 39 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

25
modules/emacs/electric-indent/autoload.el Normal file
View file

@ -0,0 +1,25 @@
;;; emacs/electric-indent/autoload.el -*- lexical-binding: t; -*-
;;;###autodef
(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))
(cl-destructuring-bind (&key char words) plist
(when (or chars words)
(let* ((name (mapconcat #'symbol-name modes "-"))
(fn (intern (format "+electric-indent--init-%s" name))))
(fset fn
(lambda () (electric-indent-local-mode +1)
(if chars (setq electric-indent-chars chars))
(if words (setq +electric-indent-words words))))
(dolist (mode modes)
(add-hook (intern (format "%s-hook" mode)) fn-name))))))
;; FIXME obsolete :electric
;;;###autoload
(def-setting! :electric (modes &rest plist)
"Declare :words (list of strings) or :chars (lists of chars) in MODES that
trigger electric indentation."
:obsolete set-electric!
`(set-electric! ,modes ,@plist))