From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Lennart Borgman (gmail)" Newsgroups: gmane.emacs.bugs,gmane.emacs.pretest.bugs Subject: bug#687: 23.0.60; Mouse wheel should not trigger mouse avoidance Date: Sun, 10 Aug 2008 22:58:01 +0200 Message-ID: <489F5659.8020801@gmail.com> Reply-To: "Lennart Borgman \(gmail\)" , 687@emacsbugs.donarmstrong.com NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------080400000408060308030903" X-Trace: ger.gmane.org 1218402466 27898 80.91.229.12 (10 Aug 2008 21:07:46 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 10 Aug 2008 21:07:46 +0000 (UTC) To: emacs-pretest-bug@gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Aug 10 23:08:38 2008 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KSI9S-0001PK-5C for geb-bug-gnu-emacs@m.gmane.org; Sun, 10 Aug 2008 23:08:34 +0200 Original-Received: from localhost ([127.0.0.1]:50129 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KSI8W-0008QK-2V for geb-bug-gnu-emacs@m.gmane.org; Sun, 10 Aug 2008 17:07:36 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KSI8Q-0008Oq-Gh for bug-gnu-emacs@gnu.org; Sun, 10 Aug 2008 17:07:30 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KSI8O-0008M4-JA for bug-gnu-emacs@gnu.org; Sun, 10 Aug 2008 17:07:29 -0400 Original-Received: from [199.232.76.173] (port=43049 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KSI8O-0008Lx-7x for bug-gnu-emacs@gnu.org; Sun, 10 Aug 2008 17:07:28 -0400 Original-Received: from rzlab.ucr.edu ([138.23.92.77]:45619) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KSI8N-0005wR-N7 for bug-gnu-emacs@gnu.org; Sun, 10 Aug 2008 17:07:28 -0400 Original-Received: from rzlab.ucr.edu (rzlab.ucr.edu [127.0.0.1]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id m7AL7OYb017642; Sun, 10 Aug 2008 14:07:24 -0700 Original-Received: (from debbugs@localhost) by rzlab.ucr.edu (8.13.8/8.13.8/Submit) id m7AL56RM016429; Sun, 10 Aug 2008 14:05:06 -0700 X-Loop: don@donarmstrong.com Resent-From: "Lennart Borgman (gmail)" Resent-To: bug-submit-list@donarmstrong.com Resent-CC: Emacs Bugs Resent-Date: Sun, 10 Aug 2008 21:05:06 +0000 Resent-Message-ID: Resent-Sender: don@donarmstrong.com X-Emacs-PR-Message: report 687 X-Emacs-PR-Package: emacs X-Emacs-PR-Keywords: Original-Received: via spool by submit@emacsbugs.donarmstrong.com id=B.121840189313989 (code B ref -1); Sun, 10 Aug 2008 21:05:06 +0000 Original-Received: (at submit) by emacsbugs.donarmstrong.com; 10 Aug 2008 20:58:13 +0000 Original-Received: from fencepost.gnu.org (fencepost.gnu.org [140.186.70.10]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id m7AKw9p2013982 for ; Sun, 10 Aug 2008 13:58:11 -0700 Original-Received: from mx10.gnu.org ([199.232.76.166]:39588) by fencepost.gnu.org with esmtp (Exim 4.67) (envelope-from ) id 1KSHyH-0001oA-Hr for emacs-pretest-bug@gnu.org; Sun, 10 Aug 2008 16:57:01 -0400 Original-Received: from Debian-exim by monty-python.gnu.org with spam-scanned (Exim 4.60) (envelope-from ) id 1KSHzJ-00052h-3Y for emacs-pretest-bug@gnu.org; Sun, 10 Aug 2008 16:58:08 -0400 Original-Received: from ch-smtp02.sth.basefarm.net ([80.76.149.213]:35936) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KSHzI-00052P-Nw for emacs-pretest-bug@gnu.org; Sun, 10 Aug 2008 16:58:04 -0400 Original-Received: from c83-254-151-176.bredband.comhem.se ([83.254.151.176]:65363 helo=[127.0.0.1]) by ch-smtp02.sth.basefarm.net with esmtp (Exim 4.68) (envelope-from ) id 1KSHzG-0006iG-8b for emacs-pretest-bug@gnu.org; Sun, 10 Aug 2008 22:58:03 +0200 User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.9) Gecko/20071031 Thunderbird/2.0.0.9 Mnenhy/0.7.5.666 X-Antivirus: avast! (VPS 080809-0, 2008-08-09), Outbound message X-Antivirus-Status: Clean X-Originating-IP: 83.254.151.176 X-Scan-Result: No virus found in message 1KSHzG-0006iG-8b. X-Scan-Signature: ch-smtp02.sth.basefarm.net 1KSHzG-0006iG-8b 60203ba265f4d0fad2be7a06278c90ae X-detected-kernel: by monty-python.gnu.org: Linux 2.6? (barebone, rare!) X-detected-kernel: by monty-python.gnu.org: Linux 2.6 (newer, 3) Resent-Date: Sun, 10 Aug 2008 17:07:29 -0400 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:19250 gmane.emacs.pretest.bugs:22813 Archived-At: This is a multi-part message in MIME format. --------------080400000408060308030903 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit I noticed that mouse wheel events might trigger mouse avoidance. That seems inappropriate. The attached patch should fix that. Please notice that I am a bit unsure about what the event names could be. There are probably more event names than those I have entered. In keyboard.c there is the following code: static char *lispy_wheel_names[] = { "wheel-up", "wheel-down", "wheel-left", "wheel-right" }; In GNU Emacs 23.0.60.1 (i386-mingw-nt5.1.2600) of 2008-08-10 --------------080400000408060308030903 Content-Type: text/plain; name="avoid-wheel.diff" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="avoid-wheel.diff" Index: avoid.el =================================================================== RCS file: /sources/emacs/emacs/lisp/avoid.el,v retrieving revision 1.47 diff -u -r1.47 avoid.el --- avoid.el 6 May 2008 07:57:26 -0000 1.47 +++ avoid.el 10 Aug 2008 20:42:26 -0000 @@ -289,7 +289,9 @@ (let ((modifiers (event-modifiers (car last-input-event)))) (or (memq (car last-input-event) '(mouse-movement scroll-bar-movement - select-window switch-frame)) + select-window switch-frame + wheel-down wheel-up double-wheel-up double-wheel-down + )) (memq 'click modifiers) (memq 'double modifiers) (memq 'triple modifiers) --------------080400000408060308030903--