From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 22 Apr 2016 04:47:44 +0000 (-0400)
Subject: * seq-24.el (seq-concatenate,seq-into,seq--make-bindings): Use _
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/cbebd058c435ee2be5e9f30cedf78430ef979466

* 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 fc1d9567b..3b0885542 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 <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))