Mercurial > emacs
changeset 8949:b307091cdf97
(add-log-current-defun): Deal with lisp-interaction-mode like lisp-mode.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 20 Sep 1994 05:38:59 +0000 |
parents | 5f79babaa7d2 |
children | 68ad2f08d735 |
files | lisp/add-log.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/add-log.el Tue Sep 20 05:20:16 1994 +0000 +++ b/lisp/add-log.el Tue Sep 20 05:38:59 1994 +0000 @@ -300,7 +300,8 @@ (condition-case nil (save-excursion (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 + lisp-interaction-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.