[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 9760c6c: * lisp/emacs-lisp/seq.el (seq-concatenate,
From: |
Nicolas Petton |
Subject: |
[Emacs-diffs] master 9760c6c: * lisp/emacs-lisp/seq.el (seq-concatenate, seq-into): Better error messages. |
Date: |
Sat, 18 Apr 2015 18:12:04 +0000 |
branch: master
commit 9760c6cde3f280b2318e9550c2688b1761b09c30
Author: Nicolas Petton <address@hidden>
Commit: Nicolas Petton <address@hidden>
* lisp/emacs-lisp/seq.el (seq-concatenate, seq-into): Better error messages.
---
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 6f7f3c4..320ee20 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.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 9760c6c: * lisp/emacs-lisp/seq.el (seq-concatenate, seq-into): Better error messages.,
Nicolas Petton <=