From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 2 Mar 2000 09:32:23 +0000 (+0000)
Subject: (add-log-current-defun): Add support for
X-Git-Tag: emacs-pretest-21.0.90~4812
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f654865f83808432e27bfc4c330c70ad466316cf;p=emacs.git

(add-log-current-defun): Add support for
Autoconf mode.
---

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 1ded7dbe35d..a30e5eb9b7e 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -749,6 +749,10 @@ Has a preference of looking backwards."
 		 (if (re-search-backward "^sub[ \t]+\\([^ \t\n]+\\)" nil t)
 		     (buffer-substring (match-beginning 1)
 				       (match-end 1))))
+                ((eq major-mode 'autoconf-mode)
+                 (if (re-search-backward "^\\(\\(m4_\\)?define\\|A._DEFUN\\)(\\[?\\([A-Za-z0-9_]+\\)" nil t)
+                     (buffer-substring (match-beginning 3)
+                                       (match-end 3))))
                 ((or (eq major-mode 'fortran-mode)
 		     ;; Needs work for f90, but better than nothing.
 		     (eq major-mode 'f90-mode))