diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-09-20 14:06:13 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-09-20 14:06:13 +0000 |
| commit | fb1b68a482b97ddb7dba49d9669094efd51ece33 (patch) | |
| tree | 69c19dd10b556aab33b3797b614a6221fee28ec2 /lisp/add-log.el | |
| parent | d60a4e3a42f2fb0838abe48ffefa4cb687813bca (diff) | |
(add-log-current-defun): Fix thinko w.r.t derived-mode-p.
Diffstat (limited to 'lisp/add-log.el')
| -rw-r--r-- | lisp/add-log.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 3112a6e7667..546f87b4e4d 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -1016,7 +1016,7 @@ Has a preference of looking backwards." ((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 |