(hilit-mode): Use mapc rather than mapcar.

2 files changed, 25 insertions, 18 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index df0bb34172a..2fed711f6d7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,12 @@
 2007-10-12  Glenn Morris  <rgm@gnu.org>
 
+        * emacs-lisp/byte-opt.el (top level):
+        * mail/rmail.el (rmail-list-to-menu):
+        * obsolete/hilit19.el (hilit-mode):
+        * progmodes/cc-mode.el (c-postprocess-file-styles)
+        (c-submit-bug-report):
+        * vc-mcvs.el (vc-mcvs-checkin): Use mapc rather than mapcar.
+
         * cus-edit.el (custom-variable-menu, custom-face-menu)
         (custom-group-menu): Check init-file-user rather than
         user-init-file, in case cus-edit is loaded by site-run-file.
diff --git a/lisp/obsolete/hilit19.el b/lisp/obsolete/hilit19.el
index 9221753a864..be0b5d622a2 100644
--- a/lisp/obsolete/hilit19.el
+++ b/lisp/obsolete/hilit19.el
@@ -975,24 +975,24 @@ the entire buffer is forced."
         (progn
 
           ;; BUFFER highlights...
-          (mapcar (lambda (hook)
-                    (if hilit-mode
-                        (add-hook hook 'hilit-rehighlight-buffer-quietly)
-                      (remove-hook hook 'hilit-rehighlight-buffer-quietly)))
-                  '(
-                    Info-selection-hook
-
-                    ;; runs too early                vm-summary-mode-hooks
-                    vm-summary-pointer-hook
-                    vm-preview-message-hook
-                    vm-show-message-hook
-
-                    rmail-show-message-hook
-                    mail-setup-hook
-                    mh-show-mode-hook
-
-                    dired-after-readin-hook
-                    ))
+          (mapc (lambda (hook)
+                  (if hilit-mode
+                      (add-hook hook 'hilit-rehighlight-buffer-quietly)
+                    (remove-hook hook 'hilit-rehighlight-buffer-quietly)))
+                '(
+                  Info-selection-hook
+
+                  ;; runs too early                  vm-summary-mode-hooks
+                  vm-summary-pointer-hook
+                  vm-preview-message-hook
+                  vm-show-message-hook
+
+                  rmail-show-message-hook
+                  mail-setup-hook
+                  mh-show-mode-hook
+
+                  dired-after-readin-hook
+                  ))
           )
       (error (message "Error loading highlight hooks: %s" c)
              (ding) (sit-for 1)))))