Mercurial > emacs
changeset 23346:4db659df7407
Add support for Octave.
| author | Stephen Eglen <stephen@gnu.org> |
|---|---|
| date | Tue, 29 Sep 1998 08:45:12 +0000 |
| parents | b61fd1c104f9 |
| children | 49e47671810d |
| files | lisp/info-look.el |
| diffstat | 1 files changed, 14 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info-look.el Mon Sep 28 16:08:58 1998 +0000 +++ b/lisp/info-look.el Tue Sep 29 08:45:12 1998 +0000 @@ -752,6 +752,20 @@ :doc-spec '(("(r5rs)Index" nil "^[ \t]+- [^:]+:[ \t]*" "\\b"))) +(info-lookup-maybe-add-help + :mode 'octave-mode + :regexp "[_a-zA-Z0-9]+" + :doc-spec '(("(octave)Function Index" nil "^ - [^:]+:[ ]+" nil) + ("(octave)Variable Index" nil "^ - [^:]+:[ ]+" nil) + ;; Catch lines of the form "xyz statement" + ("(octave)Concept Index" + (lambda (item) + (cond + ((string-match "^\\([A-Z]+\\) statement\\b" item) + (match-string 1 item)) + (t nil))) + nil; "^ - [^:]+:[ ]+" don't think this prefix is useful here. + nil))) (provide 'info-look)