From unknown Fri Jun 20 07:17:42 2025 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.509 (Entity 5.509) Content-Type: text/plain; charset=utf-8 From: bug#5711 <5711@debbugs.gnu.org> To: bug#5711 <5711@debbugs.gnu.org> Subject: Status: 23.1; Customizing the bell Reply-To: bug#5711 <5711@debbugs.gnu.org> Date: Fri, 20 Jun 2025 14:17:42 +0000 retitle 5711 23.1; Customizing the bell reassign 5711 emacs submitter 5711 Eli Barzilay severity 5711 wishlist thanks From debbugs-submit-bounces@debbugs.gnu.org Fri Mar 12 11:17:55 2010 Received: (at submit) by debbugs.gnu.org; 12 Mar 2010 16:17:56 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq7Yh-000531-DH for submit@debbugs.gnu.org; Fri, 12 Mar 2010 11:17:55 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq7Kz-0004wN-7G for submit@debbugs.gnu.org; Fri, 12 Mar 2010 11:03:47 -0500 Received: from mail.gnu.org ([199.232.76.166]:58985 helo=mx10.gnu.org) by fencepost.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq7Ku-0002m4-H3 for submit@debbugs.gnu.org; Fri, 12 Mar 2010 11:03:40 -0500 Received: from Debian-exim by monty-python.gnu.org with spam-scanned (Exim 4.60) (envelope-from ) id 1Nq7CQ-00087y-7Z for submit@debbugs.gnu.org; Fri, 12 Mar 2010 10:54:55 -0500 X-Spam-Checker-Version: SpamAssassin 3.1.0 (2005-09-13) on monty-python X-Spam-Level: X-Spam-Status: No, score=-2.5 required=5.0 tests=AWL,BAYES_00, FORGED_RCVD_HELO,UNPARSEABLE_RELAY autolearn=ham version=3.1.0 Received: from lists.gnu.org ([199.232.76.165]:54584) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1Nq7CQ-00087s-0P for submit@debbugs.gnu.org; Fri, 12 Mar 2010 10:54:54 -0500 Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Nq7CP-0000dU-Qz for bug-gnu-emacs@gnu.org; Fri, 12 Mar 2010 10:54:53 -0500 Received: from [140.186.70.92] (port=43551 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Nq7CO-0000cY-0D for bug-gnu-emacs@gnu.org; Fri, 12 Mar 2010 10:54:52 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Nq7CM-0004dR-In for bug-gnu-emacs@gnu.org; Fri, 12 Mar 2010 10:54:51 -0500 Received: from winooski.ccs.neu.edu ([129.10.115.117]:55457 helo=barzilay.org) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq7CM-0004dH-GU for bug-gnu-emacs@gnu.org; Fri, 12 Mar 2010 10:54:50 -0500 Received: from eli by barzilay.org with local (Exim 4.66) (envelope-from ) id 1Nq7CL-0004fD-7X for bug-gnu-emacs@gnu.org; Fri, 12 Mar 2010 10:54:49 -0500 From: Eli Barzilay To: bug-gnu-emacs@gnu.org Subject: 23.1; Customizing the bell Message-Id: Date: Fri, 12 Mar 2010 10:54:49 -0500 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-Spam-Score: -3.4 (---) X-Debbugs-Envelope-To: submit X-Mailman-Approved-At: Fri, 12 Mar 2010 11:17:54 -0500 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -4.7 (----) I'd like for my Emacs to sometimes ring the bell as usual, sometimes flash the screen, and sometimes play a sound. Currently, I can change it to do one of these things in the usual way, but I cannot write code that determines what to do dynamically. What's missing is a primitive function to the "real" beep. Something that would allow me to do this: (setq ring-bell-function (lambda () (if (foo) (call-process "aplay" nil 0 nil "foo.wav") (let ((visible-bell (bar))) (real-ding))))) (I could do this in a bad way, by installing some hook that will set `ring-bell-function' and `visible-bell' -- for example in an idle timer, but the above would be much more convenient.) -- ((lambda (x) (x x)) (lambda (x) (x x))) Eli Barzilay: http://barzilay.org/ Maze is Life! From debbugs-submit-bounces@debbugs.gnu.org Fri Mar 12 12:07:42 2010 Received: (at control) by debbugs.gnu.org; 12 Mar 2010 17:07:42 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq8Ks-0005OW-2s for submit@debbugs.gnu.org; Fri, 12 Mar 2010 12:07:42 -0500 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq8Kq-0005OR-MV for control@debbugs.gnu.org; Fri, 12 Mar 2010 12:07:40 -0500 Received: from rgm by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1Nq8Km-00088n-6w; Fri, 12 Mar 2010 12:07:36 -0500 MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <19354.29912.161897.952539@fencepost.gnu.org> Date: Fri, 12 Mar 2010 12:07:36 -0500 From: Glenn Morris To: control Subject: control X-Spam-Score: -5.1 (-----) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -5.1 (-----) reassign 5703 emacs,w32 tags 5705 = forcemerge 5709 5708 severity 5711 wishlist From debbugs-submit-bounces@debbugs.gnu.org Fri Mar 12 12:15:34 2010 Received: (at 5711) by debbugs.gnu.org; 12 Mar 2010 17:15:34 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq8SU-0005wC-9O for submit@debbugs.gnu.org; Fri, 12 Mar 2010 12:15:34 -0500 Received: from acsinet11.oracle.com ([141.146.126.233]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq8SS-0005w7-Nh for 5711@debbugs.gnu.org; Fri, 12 Mar 2010 12:15:33 -0500 Received: from acsinet15.oracle.com (acsinet15.oracle.com [141.146.126.227]) by acsinet11.oracle.com (Switch-3.4.2/Switch-3.4.2) with ESMTP id o2CHFOhB025240 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=OK); Fri, 12 Mar 2010 17:15:26 GMT Received: from acsmt355.oracle.com (acsmt355.oracle.com [141.146.40.155]) by acsinet15.oracle.com (Switch-3.4.2/Switch-3.4.1) with ESMTP id o2BMULE2013215; Fri, 12 Mar 2010 17:15:22 GMT Received: from abhmt013.oracle.com by acsmt353.oracle.com with ESMTP id 76811751268414095; Fri, 12 Mar 2010 09:14:55 -0800 Received: from dradamslap1 (/141.144.224.142) by default (Oracle Beehive Gateway v4.0) with ESMTP ; Fri, 12 Mar 2010 09:14:54 -0800 From: "Drew Adams" To: "'Eli Barzilay'" , <5711@debbugs.gnu.org> References: Subject: RE: bug#5711: 23.1; Customizing the bell Date: Fri, 12 Mar 2010 09:14:53 -0800 Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit X-Mailer: Microsoft Office Outlook 11 In-Reply-To: Thread-Index: AcrCAJNEaXLfu792TXax2HmezoOKMQABpPcQ X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579 X-Source-IP: acsmt355.oracle.com [141.146.40.155] X-Auth-Type: Internal IP X-CT-RefId: str=0001.0A090207.4B9A76AC.005E:SCFMA4539814,ss=1,fgs=0 X-Spam-Score: -5.7 (-----) X-Debbugs-Envelope-To: 5711 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.4 (------) I'd like it to sing the error message using an encrypted vocabulary, with 4-part harmony and with steel-drum backup. Sorry; couldn't resist. No, your request is not a silly one. From debbugs-submit-bounces@debbugs.gnu.org Fri Mar 12 13:05:39 2010 Received: (at 5711) by debbugs.gnu.org; 12 Mar 2010 18:05:39 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq9Ex-0006JU-0e for submit@debbugs.gnu.org; Fri, 12 Mar 2010 13:05:39 -0500 Received: from chene.dit.umontreal.ca ([132.204.246.20]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nq9Ev-0006JJ-Hd for 5711@debbugs.gnu.org; Fri, 12 Mar 2010 13:05:38 -0500 Received: from faina.iro.umontreal.ca (faina.iro.umontreal.ca [132.204.26.177]) by chene.dit.umontreal.ca (8.14.1/8.14.1) with ESMTP id o2CI5UKL018745; Fri, 12 Mar 2010 13:05:30 -0500 Received: by faina.iro.umontreal.ca (Postfix, from userid 20848) id DAEE13A201; Fri, 12 Mar 2010 13:05:29 -0500 (EST) From: Stefan Monnier To: Eli Barzilay Subject: Re: bug#5711: 23.1; Customizing the bell Message-ID: References: Date: Fri, 12 Mar 2010 13:05:29 -0500 In-Reply-To: (Eli Barzilay's message of "Fri, 12 Mar 2010 10:54:49 -0500") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1.93 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-NAI-Spam-Score: 0 X-NAI-Spam-Rules: 1 Rules triggered RV3490=0 X-Spam-Score: -1.9 (-) X-Debbugs-Envelope-To: 5711 Cc: 5711@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -1.9 (-) > (setq ring-bell-function > (lambda () > (if (foo) > (call-process "aplay" nil 0 nil "foo.wav") > (let ((visible-bell (bar))) (real-ding))))) Doesn't (setq ring-bell-function (lambda () (if (foo) (call-process "aplay" nil 0 nil "foo.wav") (let ((visible-bell (bar)) (ring-bell-function nil)) (ding))))) do the trick? Stefan From debbugs-submit-bounces@debbugs.gnu.org Fri Mar 12 14:20:24 2010 Received: (at 5711) by debbugs.gnu.org; 12 Mar 2010 19:20:24 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NqAPI-0006p5-FV for submit@debbugs.gnu.org; Fri, 12 Mar 2010 14:20:24 -0500 Received: from winooski.ccs.neu.edu ([129.10.115.117] helo=barzilay.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NqAPG-0006p0-Q7 for 5711@debbugs.gnu.org; Fri, 12 Mar 2010 14:20:23 -0500 Received: from eli by barzilay.org with local (Exim 4.66) (envelope-from ) id 1NqAPC-00085n-4u; Fri, 12 Mar 2010 14:20:18 -0500 From: Eli Barzilay MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-ID: <19354.37874.141285.477444@winooski.ccs.neu.edu> Date: Fri, 12 Mar 2010 14:20:18 -0500 To: Stefan Monnier Subject: Re: bug#5711: 23.1; Customizing the bell In-Reply-To: References: X-Mailer: VM 8.0.12 under 23.1.1 (x86_64-unknown-linux-gnu) X-Spam-Score: -3.7 (---) X-Debbugs-Envelope-To: 5711 Cc: 5711@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -3.3 (---) On Mar 12, Stefan Monnier wrote: > > (setq ring-bell-function > > (lambda () > > (if (foo) > > (call-process "aplay" nil 0 nil "foo.wav") > > (let ((visible-bell (bar))) (real-ding))))) > > Doesn't > > (setq ring-bell-function > (lambda () > (if (foo) > (call-process "aplay" nil 0 nil "foo.wav") > (let ((visible-bell (bar)) (ring-bell-function nil)) (ding))))) > > do the trick? Ah, you're right -- sorry. Fine to close this bug then. BTW, a better answer would be: (defun real-ding () (let ((ring-bell-function nil)) (ding))) The only thing that might make sense is to show this in the docs as a way to do this kind of thing (but I don't have any strong opinion about that). -- ((lambda (x) (x x)) (lambda (x) (x x))) Eli Barzilay: http://barzilay.org/ Maze is Life! From debbugs-submit-bounces@debbugs.gnu.org Mon Mar 15 15:39:09 2010 Received: (at 5711-done) by debbugs.gnu.org; 15 Mar 2010 19:39:09 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NrG84-0007GJ-N3 for submit@debbugs.gnu.org; Mon, 15 Mar 2010 15:39:08 -0400 Received: from fencepost.gnu.org ([140.186.70.10]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NrG83-0007GC-73 for 5711-done@debbugs.gnu.org; Mon, 15 Mar 2010 15:39:07 -0400 Received: from rgm by fencepost.gnu.org with local (Exim 4.69) (envelope-from ) id 1NrG7y-0007ub-HD; Mon, 15 Mar 2010 15:39:02 -0400 To: 5711-done@debbugs.gnu.org Subject: Re: bug#5711: 23.1; Customizing the bell References: <19354.37874.141285.477444@winooski.ccs.neu.edu> From: Glenn Morris X-Spook: Indigo Mantis BRLO Bellcore Ermes radar Albania Europol X-Ran: Xy5YolBNk2Uc7|^E~F'SeT|@Dc.dYA (Eli Barzilay's message of "Fri\, 12 Mar 2010 14\:20\:18 -0500") Message-ID: User-Agent: Gnus (www.gnus.org), GNU Emacs (www.gnu.org/software/emacs/) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Spam-Score: -6.1 (------) X-Debbugs-Envelope-To: 5711-done X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -6.1 (------) Eli Barzilay wrote: > Ah, you're right -- sorry. Fine to close this bug then. From unknown Fri Jun 20 07:17:42 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Tue, 13 Apr 2010 11:24:04 +0000 User-Agent: Fakemail v42.6.9 # A New Hope # A long time ago, in a galaxy far, far away # something happened. # # Magically this resulted in the following # action being taken, but this fake control # message doesn't tell you why it happened # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator