# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 896304737 0
# Node ID 8b08793f2633b7b2c62dd13166b089384b96bbd8
# Parent  46bb1b22d269e2e620c7d37f1bd0580bc2ba58c9
Add an entry for Scheme mode.

diff -r 46bb1b22d269 -r 8b08793f2633 lisp/info-look.el
--- a/lisp/info-look.el	Wed May 27 21:06:56 1998 +0000
+++ b/lisp/info-look.el	Wed May 27 21:32:17 1998 +0000
@@ -747,6 +747,14 @@
 	      "`" "\\({[^}]*}\\)?'")))
 
 (info-lookup-maybe-add-help
+ :mode 'scheme-mode
+ :regexp ;; "\\(\\sw\\|\\s_\\)+"
+ "[^()' \t\n]+"
+ :ignore-case t
+ ;; Aubrey Jaffer's rendition from <URL:ftp://ftp-swiss.ai.mit.edu/pub/scm>
+ :doc-spec '(("(r5rs)Index")))
+
+(info-lookup-maybe-add-help
  :mode 'emacs-lisp-mode
  :regexp "[^()' \t\n]+"
  :doc-spec '(("(emacs)Command Index")