diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-10-12 03:07:02 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-10-12 03:07:02 +0000 |
| commit | 1663d0b8f8ec5ba33ea9b04664a40343674cf9fa (patch) | |
| tree | f27cc3277c2918238bf9df643341aed783939a2f /lisp/obsolete | |
| parent | 5701a0ce2170e42cb152e63fc250947a4dc481f2 (diff) | |
| download | emacs-1663d0b8f8ec5ba33ea9b04664a40343674cf9fa.tar.gz | |
(hilit-mode): Use mapc rather than mapcar.
Diffstat (limited to 'lisp/obsolete')
| -rw-r--r-- | lisp/obsolete/hilit19.el | 36 |
1 files changed, 18 insertions, 18 deletions
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))))) |