diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-03-02 09:32:23 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-03-02 09:32:23 +0000 |
commit | f654865f83808432e27bfc4c330c70ad466316cf (patch) | |
tree | 333e9ae5f8d67a176c326b46dfd5b42436c8567e /lisp/add-log.el | |
parent | 6c5def8e73e36cab0377f5d2e05d27b181d1b3d3 (diff) | |
download | emacs-f654865f83808432e27bfc4c330c70ad466316cf.tar.gz |
(add-log-current-defun): Add support for
Autoconf mode.
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r-- | lisp/add-log.el | 4 |
1 files changed, 4 insertions, 0 deletions
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)) |