commit da4022abeed75da03af91c19e89fb77b6a2c39ce from: Omar Polo date: Sat Jul 23 10:33:21 2022 UTC cl-loop -> dolist in this case the dolist is shorter and easier to read / reason about commit - ba51d2414feec77347ec3c69eeab583a88988122 commit + da4022abeed75da03af91c19e89fb77b6a2c39ce blob - 9195be6cd8fba4d93de5863aff596a7d4f871f61 blob + 21b2eb836a1ce7d47d6a4d08779373a5a8d9728e --- vc-got.el +++ 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."