Mercurial > emacs
changeset 84676:a5b42c90ed30
(add-log-current-defun): Fix thinko w.r.t derived-mode-p.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 20 Sep 2007 14:06:13 +0000 |
parents | d820118cf671 |
children | 421e6c54ace8 |
files | lisp/ChangeLog lisp/add-log.el |
diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Sep 20 03:11:55 2007 +0000 +++ b/lisp/ChangeLog Thu Sep 20 14:06:13 2007 +0000 @@ -1,3 +1,7 @@ +2007-09-20 Stefan Monnier <monnier@iro.umontreal.ca> + + * add-log.el (add-log-current-defun): Fix thinko w.r.t derived-mode-p. + 2007-09-20 Glenn Morris <rgm@gnu.org> * textmodes/tex-mode.el (tex-validate-buffer): Use paragraph
--- a/lisp/add-log.el Thu Sep 20 03:11:55 2007 +0000 +++ b/lisp/add-log.el Thu Sep 20 14:06:13 2007 +0000 @@ -1016,7 +1016,7 @@ ((derived-mode-p 'texinfo-mode) (if (re-search-backward "^@node[ \t]+\\([^,\n]+\\)" nil t) (match-string-no-properties 1))) - ((derived-mode-p '(perl-mode cperl-mode)) + ((derived-mode-p 'perl-mode 'cperl-mode) (if (re-search-backward "^sub[ \t]+\\([^({ \t\n]+\\)" nil t) (match-string-no-properties 1))) ;; Emacs's autoconf-mode installs its own