[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master cbebd05: * seq-24.el (seq-concatenate, seq-into, seq--make
From: |
Stefan Monnier |
Subject: |
[elpa] master cbebd05: * seq-24.el (seq-concatenate, seq-into, seq--make-bindings): Use _ |
Date: |
Fri, 22 Apr 2016 04:47:47 +0000 |
branch: master
commit cbebd058c435ee2be5e9f30cedf78430ef979466
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* seq-24.el (seq-concatenate,seq-into,seq--make-bindings): Use _
rather than t as catch-all for pcase.
---
packages/seq/seq-24.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/packages/seq/seq-24.el b/packages/seq/seq-24.el
index fc1d956..3b08855 100644
--- a/packages/seq/seq-24.el
+++ b/packages/seq/seq-24.el
@@ -1,6 +1,6 @@
;;; seq-24.el --- seq.el implementation for Emacs 24.x -*- lexical-binding: t
-*-
-;; Copyright (C) 2014-2015 Free Software Foundation, Inc.
+;; Copyright (C) 2014-2016 Free Software Foundation, Inc.
;; Author: Nicolas Petton <address@hidden>
;; Keywords: sequences
@@ -270,7 +270,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))))
+ (_ (error "Not a sequence type name: %S" type))))
(defun seq-mapcat (function sequence &optional type)
"Concatenate the result of applying FUNCTION to each element of SEQUENCE.
@@ -359,7 +359,7 @@ TYPE can be one of the following symbols: vector, string or
list."
(`vector (vconcat sequence))
(`string (concat sequence))
(`list (append sequence nil))
- (t (error "Not a sequence type name: %S" type))))
+ (_ (error "Not a sequence type name: %S" type))))
(defun seq-min (sequence)
"Return the smallest element of SEQUENCE.
@@ -432,7 +432,7 @@ BINDINGS."
(seq-drop ,sequence ,index))
bindings)
(setq rest-marker t)))
- (t
+ (_
(push `(,name (seq--elt-safe ,sequence ,index)) bindings))))
(setq index (1+ index)))
bindings))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master cbebd05: * seq-24.el (seq-concatenate, seq-into, seq--make-bindings): Use _,
Stefan Monnier <=