Re: Selecting default prompt text

[Kevin Rodgers <kevin.d.rodgers@gmail.com>]

Richard Riley wrote:
> I like my interactive functions to generally use the word or region at
> point as a default. Is there a way to make the read-string mini buffer
> input to pre-select the default value?
> 
> e.g
> 
> consider
> 
> (setq url (read-string (format "Url (%s) :" url) url nil url))
> 
> Here I would like to see at the input prompt
> 
> Url (xyz): xyz
> 
> with the default value of "xyz" already selected. In other words
> the same behaviour as when you tab into a populated  entry field in most
> of applications.

(let ((url-at-point (thing-at-point 'url)))
   (read-string (if url-at-point
		   (format "URL (%s): " url-at-point)
		 "URL: ")
	       nil nil url-at-point))

-- 
Kevin Rodgers
Denver, Colorado, USA