From f7da2585886bd4fd795713a605ff6bd17a4c337a Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Mon, 12 Jul 2021 17:26:43 +0200 Subject: [PATCH] Fix dolist-with-progress-reporter behaviour * subr.el (dolist-with-progress-reporter): Use the length of list argument as maximal value the reporter with reach --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index e49c277335..20f40be40d 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -5880,7 +5880,7 @@ dolist-with-progress-reporter (,count 0) (,list ,(cadr spec))) (when (stringp ,prep) - (setq ,prep (make-progress-reporter ,prep 0 (1- (length ,list))))) + (setq ,prep (make-progress-reporter ,prep 0 (length ,list)))) (dolist (,(car spec) ,list) ,@body (progress-reporter-update ,prep (setq ,count (1+ ,count)))) -- 2.30.2