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

1 files changed, 3 insertions, 4 deletions

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 90a7db3b9b9..50759537ecb 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -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)
-                 (if (fboundp elt)
-                     (add-hook symbol elt)))
-               value))
+         (dolist (elt value)
+           (if (fboundp elt)
+               (add-hook symbol elt))))
   :convert-widget 'custom-hook-convert-widget
   :tag "Hook")