From 3fec4c1b349958d3849df58e59537027d26d1a52 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 20 Sep 1994 05:38:59 +0000 Subject: [PATCH] (add-log-current-defun): Deal with lisp-interaction-mode like lisp-mode. --- lisp/add-log.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/add-log.el b/lisp/add-log.el index 3c570fa17d5..db169295441 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -300,7 +300,8 @@ Has a preference of looking backwards." (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. -- 2.39.5