From f9443e2a83e2bd09fd82c1bd3688990346a03d35 Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Mon, 22 Jul 2019 20:09:42 +0000 Subject: [PATCH] Avoid byte compiler warning for subr.el * lisp/subr.el (number-sequence): Simplify to avoid byte compiler warning. --- lisp/subr.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/subr.el b/lisp/subr.el index 9fd3366f8a6..f1a4e8bb292 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -679,12 +679,11 @@ of course, also replace TO with a slightly larger value (list from) (or inc (setq inc 1)) (when (zerop inc) (error "The increment can not be zero")) - (let (seq (n 0) (next from) (last from)) + (let (seq (n 0) (next from)) (if (> inc 0) (while (<= next to) (setq seq (cons next seq) n (1+ n) - last next next (+ from (* n inc)))) (while (>= next to) (setq seq (cons next seq) -- 2.39.2