From: Juri Linkov <juri@jurta.org>
To: Stefan Monnier <monnier@iro.umontreal.ca>
Cc: emacs-devel@gnu.org
Subject: Re: mwheel scroll horizontally
Date: Thu, 07 Oct 2010 23:05:09 +0100 [thread overview]
Message-ID: <87d3rlpskq.fsf@mail.jurta.org> (raw)
In-Reply-To: <jwvhbgynz6w.fsf-monnier+emacs@gnu.org> (Stefan Monnier's message of "Thu, 07 Oct 2010 11:18:07 +0200")
>> Why mwheel.el doesn't allow horizontal scrolling?
>
> You mean: why doesn't it *support* horizontal scrolling?
> Lack of a corresponding patch, I guess ;-)
>
>> For instance, Gimp allows the Shift modifier to change
>> the direction of scrolling from vertical to horizontal.
>
> There are also various situations where the user has access to "real"
> horizontal scrolling. So rather than a modifier, it might be that
> horizontal scrolling is specified by mouse-6 and mouse-7 or yet
> something else.
Yes, mwheel.el is limited in this regard too and supports only
a monowheel mouse.
>> Shift and Control are already in use in mouse-wheel-scroll-amount,
>> but Meta is available. What about using Meta for horizontal
>
> Doing it via global-map key bindings doesn't sound quite right.
> Instead, we want to have mwheel understand wheel-left and wheel-right
> events, and then (if/when needed) remap (via function-key-map) other
> events to those ones.
Maybe something like (in bindings.el or in term/x-win.el):
(define-key function-key-map [mouse-4] [wheel-down])
(define-key function-key-map [mouse-5] [wheel-up])
(define-key function-key-map [mouse-6] [wheel-right])
(define-key function-key-map [mouse-7] [wheel-left])
(define-key function-key-map [M-mouse-6] [wheel-right])
(define-key function-key-map [M-mouse-7] [wheel-left])
Actually, mwheel.el contains:
(defcustom mouse-wheel-down-event
(if (or (featurep 'w32-win) (featurep 'ns-win))
'wheel-up
Does this mean that w32-win and ns-win already generate
these events instead of mouse-4 and mouse-5? Could someone
with access to these systems with a two-wheeled mouse
please tell what events they generate for the second wheel?
next prev parent reply other threads:[~2010-10-07 22:05 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-10-04 22:50 mwheel scroll horizontally Juri Linkov
2010-10-04 23:21 ` Drew Adams
2010-10-04 23:39 ` Juri Linkov
2010-10-05 0:01 ` Drew Adams
2010-10-05 4:29 ` Stephen J. Turnbull
2010-10-04 23:32 ` Juri Linkov
2010-10-07 9:18 ` Stefan Monnier
2010-10-07 22:05 ` Juri Linkov [this message]
2010-10-08 10:58 ` Jason Rumney
2010-10-08 23:56 ` Stefan Monnier
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87d3rlpskq.fsf@mail.jurta.org \
--to=juri@jurta.org \
--cc=emacs-devel@gnu.org \
--cc=monnier@iro.umontreal.ca \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.