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.