From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Johan =?UTF-8?Q?Bockg=C3=A5rd?= Newsgroups: gmane.emacs.bugs Subject: bug#19547: Patch for this bug Date: Sun, 27 Nov 2016 22:10:18 +0100 Message-ID: <87polgr5mt.fsf@gnu.org> References: <874ms03qj1.fsf@web.de> <8360nxhfiw.fsf@gnu.org> <83k2ccfnh8.fsf@gnu.org> <83wpgbdy82.fsf@gnu.org> <87y4071o5k.fsf@gmail.com> <87polgwzc2.fsf@gmail.com> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1480281133 16984 195.159.176.226 (27 Nov 2016 21:12:13 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sun, 27 Nov 2016 21:12:13 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/25.0.50 (gnu/linux) Cc: 19547@debbugs.gnu.org To: Thierry Volpiatto Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Nov 27 22:12:09 2016 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cB6k5-0003uv-6t for geb-bug-gnu-emacs@m.gmane.org; Sun, 27 Nov 2016 22:12:09 +0100 Original-Received: from localhost ([::1]:55627 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cB6k9-0006GB-1e for geb-bug-gnu-emacs@m.gmane.org; Sun, 27 Nov 2016 16:12:13 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:42201) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cB6j4-0005ig-3R for bug-gnu-emacs@gnu.org; Sun, 27 Nov 2016 16:11:07 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cB6j0-00077L-RV for bug-gnu-emacs@gnu.org; Sun, 27 Nov 2016 16:11:06 -0500 Original-Received: from debbugs.gnu.org ([208.118.235.43]:56746) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cB6j0-00077D-NK for bug-gnu-emacs@gnu.org; Sun, 27 Nov 2016 16:11:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1cB6j0-0003pZ-FS for bug-gnu-emacs@gnu.org; Sun, 27 Nov 2016 16:11:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Johan =?UTF-8?Q?Bockg=C3=A5rd?= Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 27 Nov 2016 21:11:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 19547 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 19547-submit@debbugs.gnu.org id=B19547.148028103414683 (code B ref 19547); Sun, 27 Nov 2016 21:11:02 +0000 Original-Received: (at 19547) by debbugs.gnu.org; 27 Nov 2016 21:10:34 +0000 Original-Received: from localhost ([127.0.0.1]:43912 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cB6iX-0003ol-Qx for submit@debbugs.gnu.org; Sun, 27 Nov 2016 16:10:33 -0500 Original-Received: from smtprelay-b12.telenor.se ([62.127.194.21]:54383) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cB6iV-0003oR-Dw for 19547@debbugs.gnu.org; Sun, 27 Nov 2016 16:10:31 -0500 Original-Received: from ipb4.telenor.se (ipb4.telenor.se [195.54.127.167]) by smtprelay-b12.telenor.se (Postfix) with ESMTP id 462A8EB8DE for <19547@debbugs.gnu.org>; Sun, 27 Nov 2016 22:10:25 +0100 (CET) X-SMTPAUTH-B2: [bocjoh] X-SENDER-IP: [85.229.6.57] X-LISTENER: [smtp.bredband.net] X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: A2CVDACESjtYEDkG5VVeGgEBAQECAQEBAQgBAQEBgzgBAQEBAR+BW4J7g3mlX48JhiECgWVEEAECAQEBAQEBAQYBAQEBAQECN0WEaQEBBCcvIxALISUPAQQNCwEMChoTiFMDGwGuXD2HKQ2ECgEBAQEBBQEBAQEjixmCSIdiBZofNY0wlAiJQIg9NYEVEwyDWByBXj00iHUBAQE X-IPAS-Result: A2CVDACESjtYEDkG5VVeGgEBAQECAQEBAQgBAQEBgzgBAQEBAR+BW4J7g3mlX48JhiECgWVEEAECAQEBAQEBAQYBAQEBAQECN0WEaQEBBCcvIxALISUPAQQNCwEMChoTiFMDGwGuXD2HKQ2ECgEBAQEBBQEBAQEjixmCSIdiBZofNY0wlAiJQIg9NYEVEwyDWByBXj00iHUBAQE X-IronPort-AV: E=Sophos;i="5.31,560,1473112800"; d="scan'208";a="618783536" Original-Received: from c-3906e555.04-211-6c6b701.cust.bredbandsbolaget.se (HELO muon.localdomain) ([85.229.6.57]) by ipb4.telenor.se with ESMTP; 27 Nov 2016 22:10:24 +0100 Original-Received: by muon.localdomain (Postfix, from userid 1000) id 47975484399; Sun, 27 Nov 2016 22:10:19 +0100 (CET) In-Reply-To: <87polgwzc2.fsf@gmail.com> (Thierry Volpiatto's message of "Sun, 27 Nov 2016 19:29:49 +0100") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:126196 Archived-At: Thierry Volpiatto writes: > + case FOCUS_IN_EVENT: ignore_event = Qfocus_in; break; > + case FOCUS_OUT_EVENT: ignore_event = Qfocus_out; break; > + case HELP_EVENT: ignore_event = Qhelp; break; > + case ICONIFY_EVENT: ignore_event = Qiconify; break; > + case DEICONIFY_EVENT: ignore_event = Qdeiconify; break; > + case SELECTION_REQUEST_EVENT: ignore_event = Qselection_request; break; > + } > + > /* If we're inside while-no-input, and this event qualifies > as input, set quit-flag to cause an interrupt. */ > if (!NILP (Vthrow_on_input) > - && event->kind != FOCUS_IN_EVENT > - && event->kind != FOCUS_OUT_EVENT > - && event->kind != HELP_EVENT > - && event->kind != ICONIFY_EVENT > - && event->kind != DEICONIFY_EVENT) > + && !NILP (Fmemq (ignore_event, Vwhile_no_input_ignore_events))) > { > Vquit_flag = Vthrow_on_input; > /* If we're inside a function that wants immediate quits, > @@ -11164,6 +11172,10 @@ syms_of_keyboard (void) > DEFSYM (Qiconify_frame, "iconify-frame"); > DEFSYM (Qmake_frame_visible, "make-frame-visible"); > DEFSYM (Qselect_window, "select-window"); > + DEFSYM (Qhelp, "help"); > + DEFSYM (Qiconify, "iconify"); > + DEFSYM (Qdeiconify, "deiconify"); > + DEFSYM (Qselection_request, "selection-request"); HELP_EVENT, ICONIFY_EVENT and DEICONIFY_EVENT already have the Lispy names `help-echo', `iconify-frame' and `make-frame-visible', respectively, so I think we should use those instead of inventing new symbols.