branch: elpa/htmlize
commit 1d2078e7127a8cf567260d699739281eef27c235
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
Use gensym instead of obsolete cl-gensym
`gensym' was added in Emacs 26.1. Starting with Emacs 31
`cl-gensym' is obsolete and its use results in a warning.
Bump the minimal Emacs version from 25.1 to 26.1. Seven
years after the release of the latter, that should be okay.
---
htmlize.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/htmlize.el b/htmlize.el
index bbf8008de0..acafba914d 100644
--- a/htmlize.el
+++ b/htmlize.el
@@ -6,7 +6,7 @@
;; Homepage: https://github.com/hniksic/emacs-htmlize
;; Keywords: hypermedia, extensions
;; Version: 1.58
-;; Package-Requires: ((emacs "25.1"))
+;; Package-Requires: ((emacs "26.1"))
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@@ -1347,7 +1347,7 @@ overlays that specify `face'."
That means that GENERATOR will be evaluated and returned the first time
it's called with the same value of KEY. All other times, the cached
\(memoized) value will be returned."
- (let ((value (cl-gensym)))
+ (let ((value (gensym)))
`(let ((,value (gethash ,key htmlize-memoization-table)))
(unless ,value
(setq ,value ,generator)
@@ -1555,7 +1555,7 @@ it's called with the same value of KEY. All other times,
the cached
(let* ((buffer-faces (htmlize-faces-in-buffer))
(face-map (htmlize-make-face-map
(cl-adjoin 'default buffer-faces)))
- (places (cl-gensym))
+ (places (gensym))
(title (if (buffer-file-name)
(file-name-nondirectory (buffer-file-name))
(buffer-name))))
