Function was pushed in an incomplete/invalid state
So let's fill in the gaps
This commit is contained in:
parent
898fcc85af
commit
8360a3dc8f
|
@ -5060,14 +5060,14 @@ or no selection is made: nil is returned."
|
|||
default-value)
|
||||
(setq values (mapcar
|
||||
(lambda (value)
|
||||
(if ((string-match-p (regexp-quote value) default))
|
||||
(if (string-match-p (regexp-quote value) default)
|
||||
(setq default-value
|
||||
(concat value " "
|
||||
(propertize "(default)" 'face 'font-lock-doc-face)))
|
||||
value))
|
||||
values))
|
||||
(let ((selection (ivy-read question values :preselect default-value)))
|
||||
(unless ((string-match-p "(default)$" selection)
|
||||
(unless (or (string-match-p "(default)$" selection)
|
||||
(string= "" selection))
|
||||
selection))))
|
||||
#+end_src
|
||||
|
|
Loading…
Reference in New Issue