* emacs lisp :
なんでaproposが無いんだろってことで
update : 2006-03-05 (Sun) 06:10:09
(setq inferior-lisp-load-hook (function (lambda () (defvar lisp-apropos-sym-command "(apropos '%s)\n" "Command to query inferior Lisp for a variable's documentation.") (defun lisp-apropos-sym (sym) "Send a command to the inferior Lisp to apropos symbol SYM. See variable `lisp-apropos-sym-command'." (interactive (lisp-symprompt "Apropos" (lisp-var-at-pt))) (comint-proc-query (inferior-lisp-proc) (format lisp-apropos-sym-command sym))) (define-key inferior-lisp-mode-map "\C-c\C-q" 'lisp-apropos-sym) (define-key lisp-mode-map "\C-c\C-q" 'lisp-apropos-sym) )) )
update : 2006-03-05 (Sun) 06:10:09