From: Katsumi Yamaoka <yamaoka@jpl.org>
Cc: ding@gnus.org
Subject: Re: message mode loses highlighting
Date: Fri, 11 Jul 2003 15:50:35 +0900 [thread overview]
Message-ID: <b9yd6gh5zgk.fsf@jpl.org> (raw)
In-Reply-To: <4nznjmyvdo.fsf@lockgroove.bwh.harvard.edu>
>>>>> In <4nznjmyvdo.fsf@lockgroove.bwh.harvard.edu>
>>>>> Ted Zlatanov <tzz@lifelogs.com> wrote:
> I have
> (global-font-lock-mode t)
> in my .emacs, and it affects message-mode as well I think.
Oops, I forgot it completely since I am using XEmacs usually.
In addition, I made two mistakes. One is I am using Develock[1],
the other is I forgot there is the font-lock-set-defaults buffer
local variable which indicates whether font-lock-keywords have
already been set. You can make your message buffer look like
fruit parfait again using the following hook:
(add-hook 'message-mode-hook
(lambda nil
(setq font-lock-set-defaults nil)
(font-lock-mode 1)))
or
(add-hook 'message-mode-hook
(lambda nil
(font-lock-mode -1)
(font-lock-mode 1)))
(Otherwise, you can use Develock instead ;-)
Therefore, we may have to turn off font-lock in the message-mode
function as follows:
--- message.el~ 2003-07-08 00:55:55 +0000
+++ message.el 2003-07-11 06:49:10 +0000
@@ -2345,6 +2345,8 @@
"<#!*/?\\(multipart\\|part\\|external\\|mml\\|secure\\)"))
;; Allow using comment commands to add/remove quoting.
(set (make-local-variable 'comment-start) message-yank-prefix)
+ (when (featurep 'font-lock)
+ (font-lock-mode -1))
(if (featurep 'xemacs)
(message-setup-toolbar)
(set (make-local-variable 'font-lock-defaults)
>> P.S.
>> Sorry for my funny English. I am a sophisticated writer in
>> Japanese, but not in English. ;-)
> No problem, I appreciate your help greatly. I don't know if I'll get
> the characters right, since I don't speak Japanese, but here's a try:
> どうもarigataう :)
Great! But please say a-ri-ga-to-u, not a-ri-ga-ta-u.
> I couldn't figure out a way to input "ari" or "gata" with the
> japanese-hiragana input method.
どうもありがとう :)
--
Katsumi Yamaoka <yamaoka@jpl.org>
[1] ftp://ftp.jpl.org/pub/elisp/develock.el.gz
next prev parent reply other threads:[~2003-07-11 6:50 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-06-25 15:40 Ted Zlatanov
2003-06-25 23:26 ` Johan Bockgård
2003-06-26 4:42 ` Ted Zlatanov
2003-06-26 5:24 ` Harry Putnam
2003-06-26 11:38 ` Ted Zlatanov
2003-07-01 12:02 ` Katsumi Yamaoka
2003-07-07 14:36 ` Ted Zlatanov
2003-07-07 16:54 ` Wes Hardaker
2003-07-08 2:34 ` Katsumi Yamaoka
2003-07-10 20:33 ` Ted Zlatanov
2003-07-11 6:50 ` Katsumi Yamaoka [this message]
2003-07-11 15:21 ` Ted Zlatanov
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=b9yd6gh5zgk.fsf@jpl.org \
--to=yamaoka@jpl.org \
--cc=ding@gnus.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).