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

(yas-choose-value): Accept strings as &rest argument

Browse Source
This commit is contained in:
João Távora 2012-07-30 20:18:42 +01:00
parent c566c929c0
commit 71c8e0ea46
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
yasnippet.el
View File

@ -2749,10 +2749,16 @@ If found, the content of subexp group SUBEXP (default 0) is
(match-string-no-properties grp str)
str))))
(defun yas-choose-value (possibilities)
"Prompt for a string in the list POSSIBILITIES and return it."
(defun yas-choose-avalue (&rest possibilities)
"Prompt for a string in POSSIBILITIES and return it.
The last element of POSSIBILITIES may be a list of strings."
(unless (or yas-moving-away-p
yas-modified-p)
(setq possibilities (nreverse possibilities))
(setq possibilities (if (listp (car possibilities))
(append (reverse (car possibilities)) (rest possibilities))
possibilities))
(some #'(lambda (fn)
(funcall fn "Choose: " possibilities))
yas-prompt-functions)))