Mercurial > emacs
diff lisp/add-log.el @ 36604:9a50e930a703
(add-log-current-defun): Check major-mode for `cperl-mode' as well.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 06 Mar 2001 23:33:15 +0000 |
parents | 61d0887bbd4e |
children | a19197c6442f |
line wrap: on
line diff
--- a/lisp/add-log.el Tue Mar 06 22:12:13 2001 +0000 +++ b/lisp/add-log.el Tue Mar 06 23:33:15 2001 +0000 @@ -794,7 +794,7 @@ ((eq major-mode 'texinfo-mode) (if (re-search-backward "^@node[ \t]+\\([^,\n]+\\)" nil t) (match-string-no-properties 1))) - ((eq major-mode 'perl-mode) + ((memq major-mode '(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