From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Johannes Weiner Newsgroups: gmane.emacs.devel Subject: Re: messages override minibuffer input Date: Wed, 12 Sep 2007 11:25:45 +0200 Message-ID: <20070912092545.GA12104@saeurebad.de> References: <18146.9183.561171.347511@tfkp07.physik.uni-erlangen.de> <38233.128.165.123.18.1189460486.squirrel@webmail.lanl.gov> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="===============0247490140==" X-Trace: sea.gmane.org 1189589158 24453 80.91.229.12 (12 Sep 2007 09:25:58 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 12 Sep 2007 09:25:58 +0000 (UTC) Cc: emacs-devel@gnu.org, Roland Winkler To: Davis Herring Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Sep 12 11:25:56 2007 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1IVOTr-0008UU-HL for ged-emacs-devel@m.gmane.org; Wed, 12 Sep 2007 11:25:55 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IVOTr-00086P-5Y for ged-emacs-devel@m.gmane.org; Wed, 12 Sep 2007 05:25:55 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1IVOTn-00081s-0B for emacs-devel@gnu.org; Wed, 12 Sep 2007 05:25:51 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1IVOTl-0007z3-88 for emacs-devel@gnu.org; Wed, 12 Sep 2007 05:25:50 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IVOTl-0007yY-19 for emacs-devel@gnu.org; Wed, 12 Sep 2007 05:25:49 -0400 Original-Received: from saeurebad.de ([85.214.36.134]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1IVOTk-0003QB-58 for emacs-devel@gnu.org; Wed, 12 Sep 2007 05:25:48 -0400 Original-Received: by saeurebad.de (Postfix, from userid 1000) id 63BF62F0152; Wed, 12 Sep 2007 11:25:45 +0200 (CEST) Mail-Followup-To: Davis Herring , Roland Winkler , emacs-devel@gnu.org In-Reply-To: <38233.128.165.123.18.1189460486.squirrel@webmail.lanl.gov> User-Agent: Mutt/1.5.16 (2007-06-11) X-Detected-Kernel: Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:78653 Archived-At: --===============0247490140== Content-Type: multipart/signed; micalg=pgp-sha1; protocol="application/pgp-signature"; boundary="0F1p//8PRICkK4MW" Content-Disposition: inline --0F1p//8PRICkK4MW Content-Type: text/plain; charset=us-ascii Content-Disposition: inline Hi, On Mon, Sep 10, 2007 at 02:41:26PM -0700, Davis Herring wrote: > (defvar optional-message nil > "The last message shown with the function `optional-message'.") > (defun optional-message (fmt &rest args) > "Display a message if there's nothing better being displayed." > (or (active-minibuffer-window) > (not (eq (current-message) optional-message)) > (message "%s" (setq optional-message (apply 'format fmt args))))) ELISP> (progn (setq foo "foo") (message foo) (eq (current-message) foo)) nil This function calls `message' only when the minibuffer is active. I am sorry, I can not follow that logic. How likely is it anyway that two EQUAL strings are messaged in a row? Hannes --0F1p//8PRICkK4MW Content-Type: application/pgp-signature; name="signature.asc" Content-Description: Digital signature Content-Disposition: inline -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.6 (GNU/Linux) iD8DBQFG57CZdvEGNHGk3KARAsGMAJ91m8BkSBikBWfIoCjCmtsyPrYODQCfQbLW qE+zgPnhIFrxh864UH87OTk= =hvH7 -----END PGP SIGNATURE----- --0F1p//8PRICkK4MW-- --===============0247490140== Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel --===============0247490140==--