M-x info-lookup-symbol

これなんだろう?

と思った時に，

M-x info

と打ってリファレンスから探すという時間の無駄をしていた．

該当しない箇所をなんとなく眺める，というのもいいことだとは思うけど，
時間が無いような時にピンポイントで探すには全然向いてない．

ささっと探したいときは，

M-x info-lookup-symbol

とするとよい．

以下は Gauche で使うと便利な elisp です．

;;====================================
;; Gauche info
;;====================================
(eval-after-load "info-look"
  '(progn
     (info-lookup-add-help
      :topic 'symbol
      :mode 'scheme-mode
      :regexp "[^()`',\"\t\n]+"
      :ignore-case t
      :doc-spec '(("(gauche-refj.info)Index - 手続きと構文索引" nil
                   "^ -+ [^:]+: *" "[\n ]")
                  ("(gauche-refj.info)Index - モジュール索引" nil
                   "^ -+ [^:]+: *" "[\n ]")
                  ("(gauche-refj.info)Index - クラス索引" nil
                   "^ -+ [^:]+: *" "[\n ]")
                  ("(gauche-refj.info)Index - 変数索引" nil
                   "^ -+ [^:]+: *" "[\n ]")
                  ("(slib.info)Index" (lambda (item) (concat item " <slib>"))
                   "^ -+ [^:]+: *" "[\n ]")
                  ("(r5rs)Index" (lambda (item) (concat item " <r5rs>"))
                   "^[ \t]+-+ [^:]+:[ \t]*" "[\n ]"))
      :parse-rule "[^()`',\" \t\n]+"
      :other-modes nil)

     (info-lookup-add-help
      :mode 'inferior-scheme-mode
      :other-modes '(scheme-mode))
     ))

id:masa_edw さんより，(define-key global-map "\M-?" 'info-lookup-symbol) って，elisp 付け足しておくといいかもね，と助言あったので書き足しました．便利．