[elpa] externals/compat 8e940a3460 3/3: compat-27: Fix dolist-with-progress-reporter

[ELPA Syncer]

branch: externals/compat
commit 8e940a3460d19ada63b7c3b997288ede8f71c556
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    compat-27: Fix dolist-with-progress-reporter
---
 compat-27.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compat-27.el b/compat-27.el
index d2d414adb4..3292dad506 100644
--- a/compat-27.el
+++ b/compat-27.el
@@ -230,7 +230,7 @@ print the reporter message followed by the word \"done\".
            (,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))))