* seq-24.el (seq-concatenate,seq-into,seq--make-bindings): Use _

rather than t as catch-all for pcase.

diff --git a/packages/seq/seq-24.el b/packages/seq/seq-24.el
index fc1d9567bc359d8158ceb7472aa2bdc776ea6fe5..3b08855421dd207ed17e5504579e514d7e98e94f 100644 (file)
--- 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 <nicolas@petton.fr>
 ;; 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))