diff options
| -rw-r--r-- | .emacs.d/init.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 54d86c55..7cf41aec 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -4448,7 +4448,12 @@ mutt's review view, after exiting EDITOR." (when (boundp 'browse-url-handlers) ; Emacs 27 (add-to-list 'browse-url-handlers '("/local/clhs/HyperSpec/" . eww))))) -(global-set-key "\C-cgh" #'hyperspec-lookup) +;; `hyperspec-lookup' unconditionally uses a symbol at point, but we have +;; SLIME's C-c C-d h for that. +(defun spw/hyperspec-lookup () + (interactive) + (with-temp-buffer (call-interactively #'hyperspec-lookup))) +(global-set-key "\C-cgh" #'spw/hyperspec-lookup) ;; `inf-lisp' says this is a defcustom and `slime' says it is a defvar, so ;; `custom-save-variables' will print the NOW field in the corresponding |