|
From: | Stefan Monnier |
Subject: | Re: mouse-wheel mode (and probably other stuff) broken due to use of global-map |
Date: | Thu, 21 Mar 2002 11:54:23 -0500 |
> - (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)))) I'd use `global-set-key' since that's what it's for after all. Stefan
[Prev in Thread] | Current Thread | [Next in Thread] |