From 84f3ad81a0e768204d27e61d04fc15f31e942e65 Mon Sep 17 00:00:00 2001
From: Amin Bandali <bandali@gnu.org>
Date: Wed, 16 Jan 2019 23:00:15 -0500
Subject: [PATCH] [emacs] better scrolling (both keyboard and mouse)

also use the new (version<= "26.1" emacs-version) pixel-scroll-mode
---
 init.org | 23 +++++++++++++++++++++--
 1 file changed, 21 insertions(+), 2 deletions(-)

diff --git a/init.org b/init.org
index 55874eb..16d8da7 100644
--- a/init.org
+++ b/init.org
@@ -484,6 +484,27 @@ buffers and/or modes.
   (setq mouse-autoselect-window nil))
 #+end_src
 
+** Better scrolling (arguably)
+
+#+begin_src emacs-lisp
+(setq ;; scroll-margin 1
+      ;; scroll-conservatively 10000
+      scroll-step 1
+      scroll-conservatively 10
+      scroll-preserve-screen-position 1)
+
+(use-feature mwheel
+  :defer 1
+  :config
+  (setq mouse-wheel-scroll-amount '(1 ((shift) . 1)) ; one line at a time
+        mouse-wheel-progressive-speed nil            ; don't accelerate scrolling
+        mouse-wheel-follow-mouse t))                 ; scroll window under mouse
+
+(use-feature pixel-scroll
+  :defer 1
+  :config (pixel-scroll-mode 1))
+#+end_src
+
 ** Libraries
 
 #+begin_src emacs-lisp
@@ -757,8 +778,6 @@ Some bindings for functions from built-in GNU Emacs packages:
 
  ("C-c o"   . other-window)
 
- ("C-c Q"   . save-buffers-kill-terminal)
-
  ("C-S-h C" . describe-char)
  ("C-S-h F" . describe-face)
 
-- 
2.20.1