RE: How to handle default value in read-string?

[Drew Adams <drew.adams@oracle.com>]

> I'd like read-string to somehow indicate the default value.  A natural
> idea is to include it in the prompt, for example having a prompt like
> 
> (format "Foo (%s): " default)
> 
> However, Icicles' version of read-string already does exactly that, so
> for Icicles users this would be superfluous.
> 
> So here's the question: is there a better way than just have a prompt of
> 
> (if icicle-mode (don't-include-default) (do-include-default))?

That's OK.  Or wrap the `read-string' call in:

 (let ((icicle-default-value  nil)) ...)

A nil value of `icicle-default-value' tells Icicles not to put the
default value in the prompt.  Then you can add it to the prompt
explicitly, so it will be there with and without Icicle mode:

(defun foo (strg)
 (interactive
   (let ((icicle-default-value nil))
     (list (read-string "String (default my-default): "
                        nil nil "my-default")))))