Skip to content

Commit d0fa1f0

Browse files
committed
Prefer gensym to cl-gensym, for Emacs 31
Fixes #129
1 parent 7552abf commit d0fa1f0

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

exec-path-from-shell.el

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -147,8 +147,8 @@ The default value denotes an interactive login shell."
147147
(defmacro exec-path-from-shell--warn-duration (&rest body)
148148
"Evaluate BODY and warn if execution duration exceeds a time limit.
149149
The limit is given by `exec-path-from-shell-warn-duration-millis'."
150-
(let ((start-time (cl-gensym))
151-
(duration-millis (cl-gensym)))
150+
(let ((start-time (gensym))
151+
(duration-millis (gensym)))
152152
`(let ((,start-time (current-time)))
153153
(prog1
154154
(progn ,@body)

0 commit comments

Comments
 (0)