Commit d4881668 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(hook): Use `dolist' instead of CL's `mapc'.

parent e8c7d424
......@@ -2940,10 +2940,9 @@ restoring it to the state of a face that has never been customized."
;; things like `find-file-hook' or even more basic ones, to avoid
;; chaos.
:set (lambda (symbol value)
(mapc (lambda (elt)
(dolist (elt value)
(if (fboundp elt)
(add-hook symbol elt)))
(add-hook symbol elt))))
:convert-widget 'custom-hook-convert-widget
:tag "Hook")
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment