From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Jambunathan K Newsgroups: gmane.emacs.devel Subject: Re: More noticeable version of (message) Date: Thu, 03 Nov 2011 21:53:39 +0530 Message-ID: <81bostqino.fsf@gmail.com> References: <81zkgfyrio.fsf@gmail.com> <81wrbh480a.fsf@gmail.com> <87mxcdcl5i.fsf@live.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: dough.gmane.org 1320337458 22845 80.91.229.12 (3 Nov 2011 16:24:18 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 3 Nov 2011 16:24:18 +0000 (UTC) Cc: emacs-devel@gnu.org To: Yagnesh Raghava Yakkala Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Nov 03 17:24:14 2011 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RM05L-0005v0-MM for ged-emacs-devel@m.gmane.org; Thu, 03 Nov 2011 17:24:11 +0100 Original-Received: from localhost ([::1]:34198 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RM05F-0006ES-Ur for ged-emacs-devel@m.gmane.org; Thu, 03 Nov 2011 12:24:05 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:32837) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RM05D-0006E8-5y for emacs-devel@gnu.org; Thu, 03 Nov 2011 12:24:04 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RM05B-0008Vg-RB for emacs-devel@gnu.org; Thu, 03 Nov 2011 12:24:03 -0400 Original-Received: from mail-iy0-f169.google.com ([209.85.210.169]:57039) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RM05B-0008VW-Ll for emacs-devel@gnu.org; Thu, 03 Nov 2011 12:24:01 -0400 Original-Received: by iaae16 with SMTP id e16so170149iaa.0 for ; Thu, 03 Nov 2011 09:24:01 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=from:to:cc:subject:references:mail-followup-to:date:in-reply-to :message-id:user-agent:mime-version:content-type :content-transfer-encoding; bh=gTgmsp277itzFZIq+ul0u3sapbQ6CaUVMLWJ9oqjNI0=; b=pCrOjj6A+Z7PEm4SnnIYoRudeXADIc4XmYa3ZirI7tdrmFE4E0xFzVP8y2dlJSaUsu K59QtZd2FwZUDjTC26I/KnPtOxe+a1dZR2yH7gII55yZ5quj6EOO88PSWiPEHLoAeYHB /+9hkX2pU30EMb8cou6MNfu0iZkh8kidzEaME= Original-Received: by 10.42.117.193 with SMTP id u1mr9525265icq.24.1320337441054; Thu, 03 Nov 2011 09:24:01 -0700 (PDT) Original-Received: from JAMBU-NETBOOK ([115.184.115.39]) by mx.google.com with ESMTPS id e2sm10545744ibe.0.2011.11.03.09.23.56 (version=TLSv1/SSLv3 cipher=OTHER); Thu, 03 Nov 2011 09:24:00 -0700 (PDT) Mail-Followup-To: Yagnesh Raghava Yakkala , emacs-devel@gnu.org In-Reply-To: <87mxcdcl5i.fsf@live.com> (Yagnesh Raghava Yakkala's message of "Thu, 03 Nov 2011 23:53:29 +0900") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.91 (windows-nt) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 209.85.210.169 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:145846 Archived-At: Yagnesh Raghava Yakkala writes: > Hi Jambunathan, > > Jambunathan K writes: > >> Jambunathan K writes: >> >>> Craig Muth writes: >>> >>>> I often don't notice the output of lines like=C2=A0(message "hi"), >>>> especially when in full-screen mode. >>>> >>>> Any ideas? =C2=A0Not a huge fan of beeping because I associate that wi= th >>>> an error. =C2=A0I'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=20 >>> (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=20 >> (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") > =3D> > #("test" 0 4 (face font-lock-comment-face)) > ------------------ When you eval by hand (using M-: or C-x C-e) the echoed message which is fontified gets immediately replaced with the return val from message. So the value that you see above is a stringified version of propertized text. Try the below snippet: (defun hello-world ()=20 (interactive) (message "hello world")) M-x hello-world RET > >>>> --Craig >>>> >>>> >>>> --=20