# HG changeset patch
# User Stephen Eglen <stephen@gnu.org>
# Date 1075643526 0
# Node ID 293189a557d09eb40bef69f0e4f6079f65e6585a
# Parent  64bd42d029bf81670026c9f2f3464948d9e6fd7f
Add support for maxima-mode.  Update commentary
because info-lookup-symbol is now bound to C-h S.

diff -r 64bd42d029bf -r 293189a557d0 lisp/info-look.el
--- a/lisp/info-look.el	Sun Feb 01 00:04:28 2004 +0000
+++ b/lisp/info-look.el	Sun Feb 01 13:52:06 2004 +0000
@@ -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 @@
 	      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