Skip to content

Instantly share code, notes, and snippets.

Last active December 18, 2015 05:48
  • Star 2 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save bhyde/5735219 to your computer and use it in GitHub Desktop.
Hand off slime doc search to a website, bound to C-c C-d C-s, defaults to
;;; -*- lexical-binding: t -*-
(define-slime-contrib slime-documentation-search
"Hand off a documenation search to a web site."
(:authors "Ben Hyde <>")
(:license "GPL")
(define-key slime-doc-map "\C-s" 'slime-documention-search)
(define-key slime-doc-map "s" 'slime-documention-search)))
(defvar slime-documentation-search-site-format
"Format string to create url to hand off to.")
;; Some alternatives...
; (setf slime-documentation-search-site-format "")
; (setf slime-documentation-search-site-format "")
; (setf slime-documentation-search-site-format "")
; (setf slime-documentation-search-site-format "")
(require 'browse-url)
(defun slime-documention-search (name)
"Hand off search request to a web site."
(interactive (list (slime-read-symbol-name "search for: ")))
(browse-url (format slime-documentation-search-site-format
(browse-url-encode-url name))))
(provide 'slime-documentation-search)
Copy link

aarvid commented Aug 16, 2013

I wrote a refactoring of this for my own personal use:

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment