[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: More noticeable version of (message)
From: |
Jambunathan K |
Subject: |
Re: More noticeable version of (message) |
Date: |
Thu, 03 Nov 2011 19:34:37 +0530 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.91 (windows-nt) |
Jambunathan K <address@hidden> writes:
> Craig Muth <address@hidden> writes:
>
>> I often don't notice the output of lines like (message "hi"),
>> especially when in full-screen mode.
>>
>> Any ideas? Not a huge fan of beeping because I associate that with
>> an error. I'm on a mac so any face/font stuff is fair game.
>
> Try this:
>
> (fset 'message-plain (symbol-function 'message))
>
> (defun message-colored (fmt-string &rest args)
> (message-plain
> (propertize
> (apply 'format fmt-string args)
> 'face 'font-lock-comment-face)))
>
> (fset 'message 'message-colored)
> You will see that the messages appear in comment face.
This is an elegant variation of the above.
(defadvice message
(before colored-message activate)
(ad-set-arg 0 (propertize (ad-get-arg 0) 'face 'font-lock-comment-face)))
>> --Craig
>>
>>
>>
--
- More noticeable version of (message), Craig Muth, 2011/11/01
- Re: More noticeable version of (message), Peter Münster, 2011/11/01
- Re: More noticeable version of (message), Jambunathan K, 2011/11/02
- Re: More noticeable version of (message),
Jambunathan K <=
- Re: More noticeable version of (message), Yagnesh Raghava Yakkala, 2011/11/03
- Re: More noticeable version of (message), Jambunathan K, 2011/11/03
- Re: More noticeable version of (message), Lennart Borgman, 2011/11/03
- Re: More noticeable version of (message), chad, 2011/11/03
- Re: More noticeable version of (message), Lennart Borgman, 2011/11/03
- Re: More noticeable version of (message), Juri Linkov, 2011/11/04
- Re: More noticeable version of (message), Juri Linkov, 2011/11/06
- Re: More noticeable version of (message), Lennart Borgman, 2011/11/06