nckx pushed a commit to branch master
in repository guix.
commit 98e2a15b1e31689b75f3ded128f1650d0f091436
Author: Tobias Geerinckx-Rice <[email protected]>
AuthorDate: Sun Feb 19 01:00:00 2023 +0100
git: Factor out INDEXER-PROGRESS-TOTAL-OBJECTS access.
* guix/git.scm (show-progress): Reuse the result of the first call.
---
guix/git.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/guix/git.scm b/guix/git.scm
index 95630a5e69..a1e6b3fa9c 100644
--- a/guix/git.scm
+++ b/guix/git.scm
@@ -142,7 +142,7 @@ the 'SSL_CERT_FILE' and 'SSL_CERT_DIR' environment
variables."
(indexer-progress-total-objects progress))
(define hundredth
- (match (quotient (indexer-progress-total-objects progress) 100)
+ (match (quotient total 100)
(0 1)
(x x)))
