Fix scrolling behaviour without centered-cursor-mode.

1 files changed, 7 insertions, 18 deletions

diff --git a/init.org b/init.org
index 00ed71b..724ab9a 100644
--- a/init.org
+++ b/init.org
@@ -94,8 +94,7 @@ Here’s a list of them:
 
 #+BEGIN_SRC elisp
 (defvar my/packages
-  '(centered-cursor-mode
-    ido-vertical-mode
+  '(ido-vertical-mode ; replace with helm?
     scss-mode))
 #+END_SRC
 
@@ -153,10 +152,14 @@ Emacs defaults are hostile to most people.  They are what kept me from using Ema
 (require 'better-defaults)
 #+END_SRC
 
-I’m easily confused by the way the cursor (point) keeps jumping around when scrolling by pages.  With this variable set to =t= the cursor keeps its screen position constant even when scrolling by full screens.
+I’m easily confused by the way the cursor (point) keeps jumping around when scrolling by pages.  Let the cursor keep its screen position constant even when scrolling by full screens and don’t jump around when scrolling.
 
 #+BEGIN_SRC elisp
-(setq scroll-preserve-screen-position t)
+(setq redisplay-dont-pause t
+      scroll-margin 7
+      scroll-step 1
+      scroll-conservatively 10000
+      scroll-preserve-screen-position 1)
 #+END_SRC
 
 Here are a few more simple tweaks:
@@ -1462,20 +1465,6 @@ This is even more stuff to be done after initialising packages.  I still need to
 (add-hook 'company-completion-finished-hook 'company-maybe-turn-on-fci)
 (add-hook 'company-completion-cancelled-hook 'company-maybe-turn-on-fci)
 
-
-;; keep the cursor centered to avoid sudden scroll jumps
-(require 'centered-cursor-mode)
-
-;; disable in terminal modes
-;; http://stackoverflow.com/a/6849467/519736
-;; also disable in Info mode, because it breaks going back with the backspace key
-(define-global-minor-mode my-global-centered-cursor-mode centered-cursor-mode
-  (lambda ()
-    (when (not (memq major-mode
-                     (list 'Info-mode 'term-mode 'eshell-mode 'shell-mode 'erc-mode)))
-      (centered-cursor-mode))))
-(my-global-centered-cursor-mode 1)
-
 ;; expand region
 (global-set-key (kbd "M-@") 'er/expand-region)