From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Tim Van Holder Newsgroups: gmane.emacs.devel Subject: Re: mouse-wheel mode (and probably other stuff) broken due to use of global-map Date: Thu, 21 Mar 2002 12:21:11 +0100 Organization: Anubex Sender: emacs-devel-admin@gnu.org Message-ID: <3C99C227.6030803@anubex.com> References: <200203160639.g2G6dVk07398@wijiji.santafe.edu> <3C972B46.2040604@anubex.com> <200203210903.g2L93fk10046@wijiji.santafe.edu> NNTP-Posting-Host: localhost.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit X-Trace: main.gmane.org 1016709864 24582 127.0.0.1 (21 Mar 2002 11:24:24 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Thu, 21 Mar 2002 11:24:24 +0000 (UTC) Cc: emacs-devel@gnu.org Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.33 #1 (Debian)) id 16o0gC-0006ON-00 for ; Thu, 21 Mar 2002 12:24:24 +0100 Original-Received: from fencepost.gnu.org ([199.232.76.164]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 16o0mN-000747-00 for ; Thu, 21 Mar 2002 12:30:47 +0100 Original-Received: from localhost ([127.0.0.1] helo=fencepost.gnu.org) by fencepost.gnu.org with esmtp (Exim 3.34 #1 (Debian)) id 16o0g3-0005Nx-00; Thu, 21 Mar 2002 06:24:15 -0500 Original-Received: from relay.g-net.be ([62.233.1.66] helo=mxrelay.g-net.be) by fencepost.gnu.org with esmtp (Exim 3.34 #1 (Debian)) id 16o0dv-0004z8-00; Thu, 21 Mar 2002 06:22:03 -0500 Original-Received: from anubex.com ([194.78.64.238]) by mxrelay.g-net.be (Build 98 8.9.3/NT-8.9.3) with ESMTP id MAA29091; Thu, 21 Mar 2002 12:09:21 +0100 User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.8) Gecko/20020206 X-Accept-Language: en-gb, en-us, en, nl-be, nl Original-To: rms@gnu.org Errors-To: emacs-devel-admin@gnu.org X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.0.5 Precedence: bulk List-Help: List-Post: List-Subscribe: , List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: Xref: main.gmane.org gmane.emacs.devel:2092 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:2092 Richard Stallman wrote: > > So I modified affected packages to use (current-global-map) and not > > global-map; this complies with the documentation and should keep > > them working reliably. > > Maybe we should install that change. Which packages did you change > in this way? Turns out I only changed mwheel.el (patch below) and two site packages that are used to set up preferred bindings for the function keys. Index: mwheel.el =================================================================== RCS file: /cvsroot/emacs/emacs/lisp/mwheel.el,v retrieving revision 1.10 diff -u -r1.10 mwheel.el --- mwheel.el 2 Mar 2002 08:18:12 -0000 1.10 +++ mwheel.el 21 Mar 2002 11:16:24 -0000 @@ -169,9 +169,9 @@ (condition-case () (dolist (key keys) (cond (mouse-wheel-mode - (define-key global-map key 'mwheel-scroll)) - ((eq (lookup-key global-map key) 'mwheel-scroll) - (define-key global-map key nil)))) + (define-key (current-global-map) key 'mwheel-scroll)) + ((eq (lookup-key (current-global-map) key) 'mwheel-scroll) + (define-key (current-global-map) key nil)))) (error nil)))) ;;; Compatibility entry point -- Tim Van Holder Anubex Telephone: +32 3 450 42 32 Fax: +32 3 450 42 51 _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://mail.gnu.org/mailman/listinfo/emacs-devel