(lisp-indent-function): Look for either
lisp-indent-hook or lisp-indent-function property.
This commit is contained in:
parent
34fc388296
commit
2dab780287
1 changed files with 2 additions and 1 deletions
|
@ -414,7 +414,8 @@ of the start of the containing expression."
|
|||
(let ((function (buffer-substring (point)
|
||||
(progn (forward-sexp 1) (point))))
|
||||
method)
|
||||
(setq method (get (intern-soft function) 'lisp-indent-function))
|
||||
(setq method (or (get (intern-soft function) 'lisp-indent-function)
|
||||
(get (intern-soft function) 'lisp-indent-hook)))
|
||||
(cond ((or (eq method 'defun)
|
||||
(and (null method)
|
||||
(> (length function) 3)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue