1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

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

This commit is contained in:
Glenn Morris 2007-10-12 03:07:02 +00:00
parent 5701a0ce21
commit 1663d0b8f8
2 changed files with 22 additions and 15 deletions

View file

@ -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.

View file

@ -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
(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
;; 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
rmail-show-message-hook
mail-setup-hook
mh-show-mode-hook
dired-after-readin-hook
))
dired-after-readin-hook
))
)
(error (message "Error loading highlight hooks: %s" c)
(ding) (sit-for 1)))))