diff options
| author | Nicolas Petton <nicolas@petton.fr> | 2015-04-18 20:10:27 +0200 |
|---|---|---|
| committer | Nicolas Petton <nicolas@petton.fr> | 2015-04-18 20:10:27 +0200 |
| commit | 9760c6cde3f280b2318e9550c2688b1761b09c30 (patch) | |
| tree | d910c2dcb299b7fe2d623c47b8c27727b628223c /lisp/emacs-lisp | |
| parent | b06b46e280f3772c62c207e73d87c58b78f42119 (diff) | |
| download | emacs-9760c6cde3f280b2318e9550c2688b1761b09c30.tar.gz emacs-9760c6cde3f280b2318e9550c2688b1761b09c30.tar.bz2 emacs-9760c6cde3f280b2318e9550c2688b1761b09c30.zip | |
* lisp/emacs-lisp/seq.el (seq-concatenate, seq-into): Better error messages.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/seq.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index 6f7f3c46e2a..320ee201487 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -221,7 +221,7 @@ TYPE must be one of following symbols: vector, string or list. (`vector (apply #'vconcat seqs)) (`string (apply #'concat seqs)) (`list (apply #'append (append seqs '(nil)))) - (t (error "Not a sequence type name: %s" type)))) + (t (error "Not a sequence type name: %S" type)))) (defun seq-mapcat (function seq &optional type) "Concatenate the result of applying FUNCTION to each element of SEQ. @@ -295,7 +295,7 @@ TYPE can be one of the following symbols: vector, string or list." (`vector (vconcat seq)) (`string (concat seq)) (`list (append seq nil)) - (t (error "Not a sequence type name: %s" type)))) + (t (error "Not a sequence type name: %S" type)))) (defun seq--drop-list (list n) "Return a list from LIST without its first N elements. |