Keyword added and FSF specified as Maintainer.

[bpt/emacs.git] / lisp / add-log.el

diff --git a/lisp/add-log.el b/lisp/add-log.el
index ce8130c..61a29be 100644 (file)
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -2,6 +2,7 @@
 
 ;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000 Free Software Foundation, Inc.
 
+;; Maintainer: FSF
 ;; Keywords: tools
 
 ;; This file is part of GNU Emacs.
@@ -794,7 +795,7 @@ Has a preference of looking backwards."
                ((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