Re: More noticeable version of (message)

[Yagnesh Raghava Yakkala]

Hi Jambunathan,

Jambunathan K <address@hidden> writes:

> 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)))
>

Noob here.

If I may I ask, is the above defadvise supposed show the
messages in font-lock-comment-face.?

after evaluating the above, a test gets me the following.
------------------
(message "test")
  =>
  #("test" 0 4 (face font-lock-comment-face))
------------------


>>> --Craig
>>>
>>>
>>>

-- 
YYR