[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vc-got da4022abee 2/2: cl-loop -> dolist
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vc-got da4022abee 2/2: cl-loop -> dolist |
Date: |
Sat, 23 Jul 2022 06:58:03 -0400 (EDT) |
branch: externals/vc-got
commit da4022abeed75da03af91c19e89fb77b6a2c39ce
Author: Omar Polo <op@omarpolo.com>
Commit: Omar Polo <op@omarpolo.com>
cl-loop -> dolist
in this case the dolist is shorter and easier to read / reason about
---
vc-got.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/vc-got.el b/vc-got.el
index 9195be6cd8..21b2eb836a 100755
--- a/vc-got.el
+++ b/vc-got.el
@@ -695,10 +695,10 @@ START-REVISION."
(with-current-buffer buffer
(let ((worktree-path (vc-got-root default-directory))
(inhibit-read-only t))
- (cl-loop for file in files
- do (vc-got--log (file-relative-name file worktree-path)
- limit
- start-revision)))))
+ (dolist (file files)
+ (vc-got--log (file-relative-name file worktree-path)
+ limit
+ start-revision)))))
(defun vc-got-log-outgoing (buffer remote-location)
"Fill BUFFER with the diff between the local worktree branch and
REMOTE-LOCATION."