Add iscroll

Also stub out reading mode... need to work on that

1 files changed, 23 insertions, 1 deletions

@@ -1586,6 +1586,27 @@ Let's use =hunspell=.
     (write-region "" nil ispell-personal-dictionary nil 0))
 #+end_src
 
+* Reading
+
+** Smooth-scrolling of images                                         :package:
+
+#+begin_src emacs-lisp :noweb-ref packages
+  (straight-use-package 'iscroll)
+#+end_src
+
+#+begin_src emacs-lisp :noweb-ref hooks
+  (add-hook 'text-mode-hook #'iscroll-mode)
+#+end_src
+
+#+begin_src emacs-lisp :noweb-ref modes
+  (add-hook 'iscroll-mode-hook
+            #'(lambda () (blackout 'iscroll-mode)))
+#+end_src
+
+** TODO Reading mode
+
+A custom mode to make reading comfy
+
 * Programming
 
 ** Comments
@@ -2009,7 +2030,8 @@ See [[https://github.com/redguardtoo/mastering-emacs-in-one-year-guide/blob/mast
 #+begin_src emacs-lisp :noweb-ref hooks
   (defun hook--elfeed-show ()
     (text-scale-adjust +1)
-    (visual-fill-column-mode +1))
+    (visual-fill-column-mode +1)
+    (iscroll-mode +1))
 
   (add-hook 'elfeed-show-mode-hook #'hook--elfeed-show)
 #+end_src