Improve add-log-current-defun-header-regexp

* lisp/vc/add-log.el (add-log-current-defun-header-regexp):
Allow digits.  Require at least one letter.  (Bug#48037)

diff --git a/lisp/vc/add-log.el b/lisp/vc/add-log.el
index 6b38806651594f6c90bb2cc5d335197532b2c97a..2e20284951feb6e23d7593ab6512bb94142f505b 100644 (file)
--- a/lisp/vc/add-log.el
+++ b/lisp/vc/add-log.el
@@ -1194,7 +1194,7 @@ file were isearch was started."
     (forward-paragraph n)))
 \f
 (defcustom add-log-current-defun-header-regexp
-  "^\\([[:upper:]][[:upper:]_ ]*[[:upper:]_]\\|[-_[:alpha:]]+\\)[ \t]*[:=]"
+  "^\\([[:upper:]][[:upper:]_ ]*[[:upper:]_]\\|[-_[:alnum:]]*[[:alpha:]][-_[:alnum:]]*\\)[ \t]*[:=]"
   "Heuristic regexp used by `add-log-current-defun' for unknown major modes.
 The regexp's first submatch is placed in the ChangeLog entry, in
 parentheses."