Mercurial > emacs
changeset 97134:b29e23ccc6f8
Handle AS_* in Autoconf 2.62's index for `info-lookup-symbol'.
* lisp/info-look.el (autoconf-mode :doc-spec): For
"(autoconf)M4 Macro Index", if the item already
begins with "AS_", don't prefix that string again.
| author | Thien-Thi Nguyen <ttn@gnuvola.org> |
|---|---|
| date | Wed, 30 Jul 2008 20:29:54 +0000 |
| parents | 82ea04d04cbd |
| children | 09abb4487286 |
| files | lisp/ChangeLog lisp/info-look.el |
| diffstat | 2 files changed, 11 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Jul 30 17:17:13 2008 +0000 +++ b/lisp/ChangeLog Wed Jul 30 20:29:54 2008 +0000 @@ -1,3 +1,9 @@ +2008-07-30 Thien-Thi Nguyen <ttn@gnuvola.org> + + * info-look.el (autoconf-mode :doc-spec): For + "(autoconf)M4 Macro Index", if the item already + begins with "AS_", don't prefix that string again. + 2008-07-30 Juri Linkov <juri@jurta.org> * info.el (info, Info-mode): Doc fix.
--- a/lisp/info-look.el Wed Jul 30 17:17:13 2008 +0000 +++ b/lisp/info-look.el Wed Jul 30 20:29:54 2008 +0000 @@ -755,12 +755,15 @@ ;; M4 Macro Index entries are without "AS_" prefixes, and ;; mostly without "m4_" prefixes. "dnl" is an exception, not ;; wanting any prefix. So AS_ is added back to upper-case - ;; names, m4_ to others which don't already an m4_. + ;; names (if needed), m4_ to others which don't already an m4_. ("(autoconf)M4 Macro Index" (lambda (item) (let ((case-fold-search nil)) (cond ((or (string-equal item "dnl") - (string-match "^m4_" item)) + (string-match "^m4_" item) + ;; Autoconf 2.62 index includes some macros + ;; (e.g., AS_HELP_STRING), so avoid prefixing. + (string-match "^AS_" item)) item) ((string-match "^[A-Z0-9_]+$" item) (concat "AS_" item))