ld/yasnippet
1
0
Fork 0
mirror of https://github.com/joaotavora/yasnippet.git synced 2025-10-13 21:13:04 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix Issue 138

Browse Source
This commit is contained in:
capitaomorte 2010-05-03 07:12:11 +00:00
parent 54c4b7db00
commit eb40f84432
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
yasnippet.el
View File

@ -1572,17 +1572,19 @@ TEMPLATES is a list of `yas/template'."
(when (featurep 'dropdown-list) (when (featurep 'dropdown-list)
(let (formatted-choices (let (formatted-choices
filtered-choices filtered-choices
chosen d
d) n)
(dolist (choice choices) (dolist (choice choices)
(setq d (or (and display-fn (funcall display-fn choice)) (setq d (or (and display-fn (funcall display-fn choice))
choice)) choice))
(when (stringp d) (when (stringp d)
(push d formatted-choices) (push d formatted-choices)
(push choice filtered-choices))) (push choice filtered-choices)))
(setq chosen (and formatted-choices
(nth (dropdown-list formatted-choices) (setq n (and formatted-choices (dropdown-list formatted-choices)))
filtered-choices)))))) (if n
(nth n filtered-choices)
(keyboard-quit)))))
(defun yas/completing-prompt (prompt choices &optional display-fn completion-fn) (defun yas/completing-prompt (prompt choices &optional display-fn completion-fn)
(let (formatted-choices (let (formatted-choices