This commit is contained in:
João Távora 2012-07-16 14:13:42 +01:00
parent 3b26af4233
commit 19dd43cb52

View File

@ -1630,8 +1630,10 @@ TEMPLATES is a list of `yas/template'."
'require-match 'require-match
nil nil
nil))) nil)))
(when chosen (let ((position (or (and chosen
(nth (position chosen formatted-choices :test #'string=) filtered-choices)))) (position chosen formatted-choices :test #'string=))
0)))
(nth position filtered-choices))))
(defun yas/no-prompt (prompt choices &optional display-fn) (defun yas/no-prompt (prompt choices &optional display-fn)
(first choices)) (first choices))