Commit 3fec4c1b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(add-log-current-defun): Deal with lisp-interaction-mode like lisp-mode.

parent 4361366b
......@@ -300,7 +300,8 @@ Has a preference of looking backwards."
(condition-case nil
(let ((location (point)))
(cond ((memq major-mode '(emacs-lisp-mode lisp-mode scheme-mode))
(cond ((memq major-mode '(emacs-lisp-mode lisp-mode scheme-mode
;; If we are now precisely a the beginning of a defun,
;; make sure beginning-of-defun finds that one
;; rather than the previous one.
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