Skip to content

Instantly share code, notes, and snippets.

@mbriggs

mbriggs/init-webjump.el

Created August 19, 2012 01:43
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save mbriggs/3390853 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save mbriggs/3390853 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
init-webjump.el
(defun webjump-read-string (prompt)
(let* ((prompt (concat prompt (if (word-at-point) (concat " (default: " (word-at-point) ")")) ": "))
(input (read-string prompt)))
(if (webjump-null-or-blank-string-p input) (word-at-point) input)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment