From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Paul Pogonyshev <pogonyshev@gmail.com>
Newsgroups: gmane.emacs.devel
Subject: Re: Edebug: avoid messages on 'f' command
Date: Thu, 5 May 2016 23:44:17 +0200
Message-ID: <CAG7Bpapk43Z_ZEqZrpMod06-j6seCbbNB4X3mPemZCbXutYu1Q@mail.gmail.com>
References: <CAG7BpapVWrxhCiFKKMhoZO0_cnyOPRy-HaFa93qUByW3SRtszQ@mail.gmail.com>
	<20160505131010.GC1950@acm.fritz.box>
NNTP-Posting-Host: plane.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
X-Trace: ger.gmane.org 1462484704 24405 80.91.229.3 (5 May 2016 21:45:04 GMT)
X-Complaints-To: usenet@ger.gmane.org
NNTP-Posting-Date: Thu, 5 May 2016 21:45:04 +0000 (UTC)
Cc: emacs-devel@gnu.org
To: Alan Mackenzie <acm@muc.de>
Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu May 05 23:45:03 2016
Return-path: <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Envelope-to: ged-emacs-devel@m.gmane.org
Original-Received: from lists.gnu.org ([208.118.235.17])
	by plane.gmane.org with esmtp (Exim 4.69)
	(envelope-from <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>)
	id 1ayR4v-0005xZ-Fb
	for ged-emacs-devel@m.gmane.org; Thu, 05 May 2016 23:45:01 +0200
Original-Received: from localhost ([::1]:55505 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>)
	id 1ayR4r-0007qN-Rl
	for ged-emacs-devel@m.gmane.org; Thu, 05 May 2016 17:44:57 -0400
Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:56261)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <pogonyshev@gmail.com>) id 1ayR4j-0007cl-Cx
	for emacs-devel@gnu.org; Thu, 05 May 2016 17:44:55 -0400
Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <pogonyshev@gmail.com>) id 1ayR4X-0002u3-Ik
	for emacs-devel@gnu.org; Thu, 05 May 2016 17:44:43 -0400
Original-Received: from mail-ob0-x244.google.com ([2607:f8b0:4003:c01::244]:34893)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <pogonyshev@gmail.com>) id 1ayR4W-0002oC-BE
	for emacs-devel@gnu.org; Thu, 05 May 2016 17:44:37 -0400
Original-Received: by mail-ob0-x244.google.com with SMTP id o7so5843982obl.2
	for <emacs-devel@gnu.org>; Thu, 05 May 2016 14:44:21 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113;
	h=mime-version:in-reply-to:references:date:message-id:subject:from:to
	:cc; bh=HlGJWxbex7Os1Zv7pVc9I6GNObP0TsvoMIqsnb0Ntt8=;
	b=zAe7AqDHfcFOwYNRizLZ1WfDurFBW7MnV0QdSwDSmWT/+YOcA8u3K3sKBCZo3yCmNa
	URcVtBA56Piq7G6hZhOGxE2N+MLeovnG8s7Ucty3KCDmN2+/Co9JKa9EcDHQFeVwzQk2
	Fdn2es0EdFSZMyB/QUe0fIYvGanywaGAVlFshJxQ6y9Nm2NyimUZ0nw2t/aT0TsBop6Q
	tpLsuJUoRLgCY/i1Z7Uzay9eAzo8hTbXyCYNuebYnCf+fKARMiha4y2bjObcEJtD3OYh
	/BjsskNZLwfKKKaEFLFOswb9d3jEE55Ce1w3sbt9eob4XEpIDOhgQqFhOs6Xns5zUVsD
	ZAdA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
	d=1e100.net; s=20130820;
	h=x-gm-message-state:mime-version:in-reply-to:references:date
	:message-id:subject:from:to:cc;
	bh=HlGJWxbex7Os1Zv7pVc9I6GNObP0TsvoMIqsnb0Ntt8=;
	b=hau/B4tIBEVwFlZ0TEV9vz4T7OqRchc2kgKBk0hqRcOUvIyxOZlI9OYaaDGZ213dI1
	HrmgFfx/K3HGdflnm2qmLRlKqFeLoLdQf8KO2gzNzlaaQo9X3x0sF546ab4+OBZnfX2O
	YAxiFbJ9+fIzj+6QNuot39IVzMXwkr7mhDi5LNo5GJNPoLMmlKtqdJtXoUzKBBwo0cmD
	90XmWTOlvN9r+3BQ0ecHeFS6ZUaJF+xX/JZZEDGU9j8pVuOvfGWprMmloKQ+Ag97DMAO
	wg4SABb+LwlTzt/e6pluetEM53z/EZFBf9lYJqWUvgWM/sk/FGiYU80HFXqT4dJZMdx/
	8Lzg==
X-Gm-Message-State: AOPr4FV68RxZ/TY2hl8FwnXv7jMVQImHYa/MmkQeXvJteG1OBnoUNIRsDt+ZlqtlPSMTVhJpSWII00QrSMQUEw==
X-Received: by 10.182.114.226 with SMTP id jj2mr8575129obb.40.1462484657973;
	Thu, 05 May 2016 14:44:17 -0700 (PDT)
Original-Received: by 10.202.235.82 with HTTP; Thu, 5 May 2016 14:44:17 -0700 (PDT)
In-Reply-To: <20160505131010.GC1950@acm.fritz.box>
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 2607:f8b0:4003:c01::244
X-BeenThere: emacs-devel@gnu.org
X-Mailman-Version: 2.1.21
Precedence: list
List-Id: "Emacs development discussions." <emacs-devel.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-devel/>
List-Post: <mailto:emacs-devel@gnu.org>
List-Help: <mailto:emacs-devel-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=subscribe>
Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org
Original-Sender: "Emacs-devel" <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Xref: news.gmane.org gmane.emacs.devel:203625
Archived-At: <http://permalink.gmane.org/gmane.emacs.devel/203625>

Yes, it works fine for me. Thank you.

Paul

On 5 May 2016 at 15:10, Alan Mackenzie <acm@muc.de> wrote:
> Hello, Paul.
>
> On Tue, May 03, 2016 at 08:58:52PM +0200, Paul Pogonyshev wrote:
>> In Edebug 'f' is bound to 'edebug-forward-sexp'. It can be seen as
>> "faster" space key, allowing you to step through function a whole sexp
>> at a time. However, there is an annoyance to it: each time I hit it,
>> echo area displays "Break" for about a second, which is only then
>> replaced by "Result: ...". By comparison, space displays result
>> immediately.
>
> Yes, this irritates me too.
>
>> Request: improve Edebug to not print such intermediate message(s)
>> during 'f' and similar commands.
>
> Would you please try out the following patch.  It entirely cuts out the
> one second pause on all "break commands" (whatever they might be).
> Hopefully there aren't any unwanted side effects.
>
> Just set the new customisable variable to nil, and off you go!
>
> The patch is based on today's master branch.
>
>
>
> diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
> index e8484fa..5d2e4e6 100644
> --- a/lisp/emacs-lisp/edebug.el
> +++ b/lisp/emacs-lisp/edebug.el
> @@ -233,6 +233,11 @@ edebug-sit-for-seconds
>    :type 'number
>    :group 'edebug)
>
> +(defcustom edebug-sit-on-break t
> +  "Whether or not to pause for `edebug-sit-for-seconds' on reaching a break"
> +  :type 'boolean
> +  :group 'edebug)
> +
>  ;;; Form spec utilities.
>
>  (defun get-edebug-spec (symbol)
> @@ -2489,6 +2494,7 @@ edebug--display-1
>                  (progn
>                    ;; Display result of previous evaluation.
>                    (if (and edebug-break
> +                           edebug-sit-on-break
>                             (not (eq edebug-execution-mode 'Continue-fast)))
>                        (sit-for edebug-sit-for-seconds)) ; Show message.
>                    (edebug-previous-result)))
>
>
>> Paul
>
> --
> Alan Mackenzie (Nuremberg, Germany).