From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.devel Subject: Re: Bell Date: Sun, 21 Mar 2010 01:59:05 +0200 Organization: JURTA Message-ID: <87iq8qikuu.fsf@mail.jurta.org> References: <4BA0CDF9.40707@online.de> <76682E4761EA432EB929E5E199B0F92A@us.oracle.com> <87wrxb57e1.fsf@lola.goethe.zz> <20100317.200901.408057447.hanche@math.ntnu.no> <87sk7y2gh9.fsf@lola.goethe.zz> <87bpelic8g.fsf@mail.jurta.org> <878w9ox1x4.fsf@lola.goethe.zz> <87d3z074fs.fsf@stupidchicken.com> <87tyscysm2.fsf@mail.jurta.org> <87mxy23b3f.fsf@catnip.gol.com> <88262642C6164CD2872637E1309A66CB@us.oracle.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1269132260 4077 80.91.229.12 (21 Mar 2010 00:44:20 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sun, 21 Mar 2010 00:44:20 +0000 (UTC) Cc: 'Chong Yidong' , emacs-devel@gnu.org, 'Stefan Monnier' , 'Miles Bader' To: "Drew Adams" Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun Mar 21 01:44:15 2010 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.69) (envelope-from ) id 1Nt9H4-0002i7-MW for ged-emacs-devel@m.gmane.org; Sun, 21 Mar 2010 01:44:14 +0100 Original-Received: from localhost ([127.0.0.1]:41622 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Nt9H4-0000LP-5w for ged-emacs-devel@m.gmane.org; Sat, 20 Mar 2010 20:44:14 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Nt9Dc-0007D2-Lx for emacs-devel@gnu.org; Sat, 20 Mar 2010 20:40:40 -0400 Original-Received: from [140.186.70.92] (port=34338 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Nt9DX-0007AV-MI for emacs-devel@gnu.org; Sat, 20 Mar 2010 20:40:40 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Nt9DN-00015a-7e for emacs-devel@gnu.org; Sat, 20 Mar 2010 20:40:35 -0400 Original-Received: from smtp-out2.starman.ee ([85.253.0.4]:58194 helo=mx2.starman.ee) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nt9DM-00015U-TL; Sat, 20 Mar 2010 20:40:25 -0400 X-Virus-Scanned: by Amavisd-New at mx2.starman.ee Original-Received: from mail.starman.ee (62.65.209.96.cable.starman.ee [62.65.209.96]) by mx2.starman.ee (Postfix) with ESMTP id 4CAAD3F4116; Sun, 21 Mar 2010 02:40:17 +0200 (EET) In-Reply-To: <88262642C6164CD2872637E1309A66CB@us.oracle.com> (Drew Adams's message of "Sat, 20 Mar 2010 16:17:37 -0700") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (x86_64-pc-linux-gnu) X-detected-operating-system: by eggs.gnu.org: GNU/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:122395 Archived-At: >> > If some people don't like the currentl visual bell, maybe >> > we can come up with a better one. >> >> http://www.emacswiki.org/emacs/MilesBader#echo-area-bell > Rather, what's called for is a way to mute `ding' in a flexible way. What Juri > suggested wrt putting a silence property on function symbols, and what I > suggested wrt binding a silence variable, would provide what's needed. And maybe > there are other suggestions. Maybe what Miles suggested would be a better ring bell function? What I like is an error message highlighted in the echo-area. Currently in most cases a flashing screen is accompanied with an error message. I think it's a bug when there is no error message displayed. For instance, typing C-b or M-v at the beginning of the buffer displays "Beginning of buffer", but typing C-p doesn't display this error message. I think it is a bug that should be fixed with this patch: === modified file 'lisp/simple.el' --- lisp/simple.el 2010-03-05 12:01:10 +0000 +++ lisp/simple.el 2010-03-20 23:57:09 +0000 @@ -4105,9 +4115,10 @@ (defun next-line (&optional arg try-vscr (insert (if use-hard-newlines hard-newline "\n"))) (line-move arg nil nil try-vscroll)) (if (called-interactively-p 'interactive) - (condition-case nil + (condition-case err (line-move arg nil nil try-vscroll) - ((beginning-of-buffer end-of-buffer) (ding))) + ((beginning-of-buffer end-of-buffer) + (ding (message "%s" (error-message-string err))))) (line-move arg nil nil try-vscroll))) nil) @@ -4135,9 +4146,10 @@ (defun previous-line (&optional arg try- (interactive "^p\np") (or arg (setq arg 1)) (if (called-interactively-p 'interactive) - (condition-case nil + (condition-case err (line-move (- arg) nil nil try-vscroll) - ((beginning-of-buffer end-of-buffer) (ding))) + ((beginning-of-buffer end-of-buffer) + (ding (message "%s" (error-message-string err))))) (line-move (- arg) nil nil try-vscroll)) nil) -- Juri Linkov http://www.jurta.org/emacs/