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 | c16fcbb5e1a78d6c7cb20d71e2d4911c9b0aa203 (patch) | |
| tree | b061bab74f6013800aa25fc47c1a58e0e94405c0 /lisp/add-log.el | |
| parent | e0a8d184c8e9d0e8f3237ed8eaf202b85f640cdf (diff) | |
| download | emacs-c16fcbb5e1a78d6c7cb20d71e2d4911c9b0aa203.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)) |