Mercurial > emacs
comparison lisp/mh-e/mh-show.el @ 86202:794e428cd497
* eshell/esh-util.el (eshell-under-xemacs-p): Remove.
* eshell/esh-mode.el (eshell-mode-syntax-table)
(command-running-p):
* eshell/esh-ext.el (eshell-external-command):
* eshell/esh-cmd.el (require):
* eshell/em-unix.el (eshell-plain-locate-behavior):
* eshell/em-cmpl.el (eshell-cmpl-initialize): Replace
eshell-under-xemacs-p with (featurep 'xemacs).
* eshell/esh-mode.el (characterp,char-int): Remove unused
conditional defaliases.
* pcomplete.el (pcomplete-event-matches-key-specifier-p): Rename
from event-matches-key-specifier-p, define unconditionally.
(event-basic-type): Remove unused defalias.
(pcomplete-show-completions):
Use pcomplete-event-matches-key-specifier-p.
* mh-e.el (mh-xemacs-flag): Remove.
(mh-min-colors-defined-flag):
* mh-xface.el (mh-show-xface-function):
* mh-utils.el (mh-colors-available-p):
* mh-show.el (mh-show-mode):
* mh-gnus.el (mh-gnus-local-map-property):
* mh-folder.el (mh-folder-mode-map)
(mh-remove-xemacs-horizontal-scrollbar, mh-folder-mode):
* mh-comp.el (mh-insert-x-mailer): Replace uses of mh-xemacs-flag
with (featurep 'xemacs).
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Sat, 17 Nov 2007 17:35:09 +0000 |
parents | 79a51974e5fc |
children | 107ccd98fa12 |
comparison
equal
deleted
inserted
replaced
86201:ea8415c6aa5b | 86202:794e428cd497 |
---|---|
870 (font-lock-fontify-region-function | 870 (font-lock-fontify-region-function |
871 . mh-show-font-lock-fontify-region))) | 871 . mh-show-font-lock-fontify-region))) |
872 (mh-gnus-article-highlight-citation)) | 872 (mh-gnus-article-highlight-citation)) |
873 (t | 873 (t |
874 (setq font-lock-defaults '(mh-show-font-lock-keywords t)))) | 874 (setq font-lock-defaults '(mh-show-font-lock-keywords t)))) |
875 (if (and mh-xemacs-flag | 875 (if (and (featurep 'xemacs) |
876 font-lock-auto-fontify) | 876 font-lock-auto-fontify) |
877 (turn-on-font-lock)) | 877 (turn-on-font-lock)) |
878 (when mh-decode-mime-flag | 878 (when mh-decode-mime-flag |
879 (mh-make-local-hook 'kill-buffer-hook) | 879 (mh-make-local-hook 'kill-buffer-hook) |
880 (add-hook 'kill-buffer-hook 'mh-mime-cleanup nil t)) | 880 (add-hook 'kill-buffer-hook 'mh-mime-cleanup nil t)) |