aboutsummaryrefslogtreecommitdiff
path: root/lisp/magit-git.el
diff options
context:
space:
mode:
authorJonas Bernoulli <jonas@bernoul.li>2025-03-01 17:17:39 +0100
committerJonas Bernoulli <jonas@bernoul.li>2025-03-01 17:17:39 +0100
commitdfbc8fb91367dd6c12072c4cddabb47470c23f8c (patch)
tree2eb34e1b976a72e8797034867dcaaa89452dc5fc /lisp/magit-git.el
parenteef5e862d8d4f8add13b7ac8c9343c85f017e8cf (diff)
Use gensym instead of obsolete cl-gensym
Diffstat (limited to 'lisp/magit-git.el')
-rw-r--r--lisp/magit-git.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/magit-git.el b/lisp/magit-git.el
index 76b976d..334d255 100644
--- a/lisp/magit-git.el
+++ b/lisp/magit-git.el
@@ -252,8 +252,8 @@ See info node `(magit)Debugging Tools' for more information."
(defmacro magit--with-refresh-cache (key &rest body)
(declare (indent 1) (debug (form body)))
- (let ((k (cl-gensym))
- (hit (cl-gensym)))
+ (let ((k (gensym))
+ (hit (gensym)))
`(if magit--refresh-cache
(let ((,k ,key))
(if-let ((,hit (assoc ,k (cdr magit--refresh-cache))))
@@ -299,7 +299,7 @@ propagated by `with-temp-buffer', so we explicitly ensure that
happens, so that processes will be invoked consistently. BODY is
as for that macro."
(declare (indent 0) (debug (body)))
- (let ((p (cl-gensym)))
+ (let ((p (gensym)))
`(let ((,p process-environment))
(with-temp-buffer
(setq-local process-environment ,p)
@@ -2402,7 +2402,7 @@ and this option only controls what face is used.")
(defmacro magit-with-temp-index (tree arg &rest body)
(declare (indent 2) (debug (form form body)))
- (let ((file (cl-gensym "file")))
+ (let ((file (gensym "file")))
`(let ((magit--refresh-cache nil)
(,file (magit-convert-filename-for-git
(make-temp-name