]> git.eshelyaron.com Git - emacs.git/commit
Use mouse-wheel-up-event in mwheel-tests.el
authorDaniel Martín <mardani29@yahoo.es>
Tue, 8 Sep 2020 12:18:17 +0000 (14:18 +0200)
committerStefan Kangas <stefan@marxist.se>
Tue, 8 Sep 2020 16:31:15 +0000 (18:31 +0200)
commit3e5259a268d423ef3b6a0ffcfe05ac623bbe7f25
treeca97a31e1c7988abd255cc253cf91cf72a641c6e
parent7865b4044d7520bcf4053ef5d763019dae499a08
Use mouse-wheel-up-event in mwheel-tests.el

Enabling mouse-wheel-mode binds two different mouse events, depending
on the operating system. The correct way to check for those events is
by checking mouse-wheel-up-event, as explained in the ELisp manual.

* test/lisp/mwheel-tests.el (mwheel-test-enable/disable): Check
mouse-wheel-up-event instead of mouse-4 to make the test work
irrespective of the platform it's running.
test/lisp/mwheel-tests.el