diff options
| author | Philippe Vaucher <philippe.vaucher@gmail.com> | 2026-01-07 10:36:01 +0100 |
|---|---|---|
| committer | Philippe Vaucher <Silex@users.noreply.github.com> | 2026-01-07 10:51:59 +0100 |
| commit | 80fa2366c4b8922f14946f3d82ff77e19f22e434 (patch) | |
| tree | ff49138f71fbc0cb4580c17f2a262ba3751794a1 /projectile.el | |
| parent | 72f3c5f842d9824e1990bedbf59f5f95d9f72003 (diff) | |
Avoid obsolete macros
Emacs 31.1 treats when-let and cl-gensym as obsolete errors during
byte-compilation, so switch to when-let* and gensym to keep snapshot
CI green.
Diffstat (limited to 'projectile.el')
| -rw-r--r-- | projectile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/projectile.el b/projectile.el index e79a909..a22de25 100644 --- a/projectile.el +++ b/projectile.el @@ -1101,7 +1101,7 @@ is cleared when there is no current project (unless you give a prefix argument)." (interactive "P") (setq projectile-project-root-cache (make-hash-table :test 'equal)) - (when-let ((project-root + (when-let* ((project-root (if prompt (completing-read "Remove cache for: " (hash-table-keys projectile-projects-cache)) @@ -4147,7 +4147,7 @@ anaphora.el." (if (null clauses) nil (let ((cl1 (car clauses)) - (sym (cl-gensym))) + (sym (gensym))) `(let ((,sym ,(car cl1))) (if ,sym (if (null ',(cdr cl1)) |