diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mwheel.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mwheel.el b/lisp/mwheel.el index 5d18cf84c2b..6a853a35216 100644 --- a/lisp/mwheel.el +++ b/lisp/mwheel.el @@ -415,8 +415,8 @@ value of ARG, and the command uses it in subsequent scrolls." (cond ((memq button (list mouse-wheel-down-event mouse-wheel-down-alternate-event)) (text-scale-increase 1)) - ((eq button (list mouse-wheel-up-event - mouse-wheel-up-alternate-event)) + ((memq button (list mouse-wheel-up-event + mouse-wheel-up-alternate-event)) (text-scale-decrease 1))) (select-window selected-window)))) |