Update seq.el to 2.16

[gnu-emacs-elpa] / packages / seq / seq-24.el

diff --git a/packages/seq/seq-24.el b/packages/seq/seq-24.el
index 3b08855421dd207ed17e5504579e514d7e98e94f..d0aa618bd3fa123a69da7727727ffe910d48bf63 100644 (file)
--- a/packages/seq/seq-24.el
+++ b/packages/seq/seq-24.el
@@ -374,10 +374,7 @@ SEQUENCE must be a sequence of numbers or markers."
 (defun seq--drop-list (list n)
   "Return a list from LIST without its first N elements.
 This is an optimization for lists in `seq-drop'."
-  (while (and list (> n 0))
-    (setq list (cdr list)
-          n (1- n)))
-  list)
+  (nthcdr n list))
 
 (defun seq--take-list (list n)
   "Return a list from LIST made of its first N elements.