diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2025-03-01 17:17:39 +0100 |
|---|---|---|
| committer | Jonas Bernoulli <jonas@bernoul.li> | 2025-03-01 17:17:39 +0100 |
| commit | dfbc8fb91367dd6c12072c4cddabb47470c23f8c (patch) | |
| tree | 2eb34e1b976a72e8797034867dcaaa89452dc5fc /lisp/magit-git.el | |
| parent | eef5e862d8d4f8add13b7ac8c9343c85f017e8cf (diff) | |
Use gensym instead of obsolete cl-gensym
Diffstat (limited to 'lisp/magit-git.el')
| -rw-r--r-- | lisp/magit-git.el | 8 |
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 |
