From b3a3e4e1628a48e4f3ca5004d2a7a48e6cc8052c Mon Sep 17 00:00:00 2001 From: Stephen Eglen Date: Sun, 1 Feb 2004 13:52:33 +0000 Subject: [PATCH] Add support for maxima-mode. Update commentary because info-lookup-symbol is now bound to C-h S. --- lisp/ChangeLog | 5 +++++ lisp/info-look.el | 13 ++++++++++++- 2 files changed, 17 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c5a5ffe16ae..f4cdf9028bd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-02-01 Stephen Eglen + + * info-look.el: Add support for maxima-mode. Update commentary + because info-lookup-symbol is now bound to C-h S. + 2004-01-31 Luc Teirlinck * simple.el (edit-and-eval-command): Bind print-level and diff --git a/lisp/info-look.el b/lisp/info-look.el index a184567ea9c..89eb1d7e411 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el @@ -27,7 +27,7 @@ ;;; Commentary: ;; Really cool code to lookup info indexes. -;; Try especially info-lookup-symbol (aka C-h TAB). +;; Try especially info-lookup-symbol (aka C-h S). ;;; Code: @@ -830,6 +830,17 @@ Return nil if there is nothing appropriate in the buffer near point." nil; "^ - [^:]+:[ ]+" don't think this prefix is useful here. nil))) +(info-lookup-maybe-add-help + :mode 'maxima-mode + :ignore-case t + :regexp "[a-zA-Z_%]+" + :doc-spec '( ("(maxima)Function and Variable Index" nil + "^ - [^:]+:[ ]+\\(\\[[^=]*=[ ]+\\)?" nil))) + +(info-lookup-maybe-add-help + :mode 'inferior-maxima-mode + :other-modes '(maxima-mode)) + ;; coreutils and bash builtins overlap in places, eg. printf, so there's a ;; question which should come first. Some of the coreutils descriptions are ;; more detailed, but if bash is usually /bin/sh on a GNU system then the -- 2.39.2