現在のカーソル位置の単語をdescribeで調べる
gaucheだと(describe 何か)で調べることができる。
こんなものを定義しておくとらくかもしれない。
(defun scheme-describe-current-word () (interactive) (let ((buf "*d*")) (with-output-to-temp-buffer buf (let ((target (substring-no-properties (current-word)))) (princ (format "(describe %s)" target)) (set-buffer buf) (scheme-send-last-sexp) (kill-buffer buf))))) (add-hook 'scheme-mode-hook (lambda () (define-key scheme-mode-map "\M-d" 'scheme-describe-current-word) (define-key scheme-mode-map [f1] 'scheme-describe-current-word) ))
f1とかM-dで現在カーソルがさしている単語について調べられる.