Function: quickurl

quickurl is an interactive and byte-compiled function defined in quickurl.el.gz.

Signature

(quickurl &optional LOOKUP)

Documentation

Insert a URL based on LOOKUP.

If not supplied LOOKUP is taken to be the word at point in the current buffer, this default action can be modified via quickurl-grab-lookup-function.

Probably introduced at or before Emacs version 21.1.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/quickurl.el.gz
;;;###autoload
(defun quickurl (&optional lookup)
  "Insert a URL based on LOOKUP.

If not supplied LOOKUP is taken to be the word at point in the current
buffer, this default action can be modified via
`quickurl-grab-lookup-function'."
  (interactive)
  (when (or lookup
            (setq lookup (funcall quickurl-grab-lookup-function)))
    (quickurl-load-urls)
    (let ((url (quickurl-find-url lookup)))
      (if (null url)
          (error "No URL associated with \"%s\"" lookup)
        (when (looking-at "\\w")
          (skip-syntax-forward "\\w"))
        (insert " ")
        (quickurl-insert url)))))