diff options
author | Martin Polden <mpolden@mpolden.no> | 2022-01-25 19:01:40 +0100 |
---|---|---|
committer | Martin Polden <mpolden@mpolden.no> | 2022-01-25 19:02:35 +0100 |
commit | f013bc6bfdf23738831a8dcfd84682bf077f2a17 (patch) | |
tree | abf92061c0be72f1dac50684708cd4a25d65ba28 /lisp/init-sane-defaults.el | |
parent | 82105730455a095daf3ec8a89354524252cf540d (diff) |
sane-defaults: Only tweak scrolling when non-smooth
Diffstat (limited to 'lisp/init-sane-defaults.el')
-rw-r--r-- | lisp/init-sane-defaults.el | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/lisp/init-sane-defaults.el b/lisp/init-sane-defaults.el index 6d59781..ef47af6 100644 --- a/lisp/init-sane-defaults.el +++ b/lisp/init-sane-defaults.el @@ -14,14 +14,16 @@ ;; disable audible bell (setq ring-bell-function #'ignore) -;; scroll one line at a time -(setq mouse-wheel-scroll-amount - '(1 - ((shift) . 5) - ((control)))) - -;; disable scroll acceleration -(setq mouse-wheel-progressive-speed nil) +;; tweak scrolling when smooth scrolling is unavailable or disabled +(when (not (bound-and-true-p mac-mouse-wheel-smooth-scroll)) + ;; scroll one line at a time + (setq mouse-wheel-scroll-amount + '(1 + ((shift) . 5) + ((control)))) + + ;; disable scroll acceleration + (setq mouse-wheel-progressive-speed nil)) ;; reload buffers automatically when files change on disk (use-package autorevert |