Skip to content

GitLab

Commit 2dab7802 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(lisp-indent-function): Look for either 

lisp-indent-hook or lisp-indent-function property.
parent 34fc3882
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 1 deletion
lisp/emacs-lisp/lisp-mode.el
View file @ 2dab7802
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment