Bladeren bron

add text size fix for linum

Josh Bicking 7 jaren geleden
bovenliggende
commit
e8d62c9374
1 gewijzigde bestanden met toevoegingen van 11 en 1 verwijderingen
  1. 11 1
      emacs.d/packages/packages.el

+ 11 - 1
emacs.d/packages/packages.el

@@ -214,7 +214,17 @@
   :config
   (setq linum-relative-current-symbol "")
   (linum-mode)
-  (linum-relative-global-mode))
+  (linum-relative-global-mode)
+  (defun linum-update-window-scale-fix (win)
+  "fix linum for scaled text"
+  (set-window-margins win
+          (ceiling (* (if (boundp 'text-scale-mode-step)
+                  (expt text-scale-mode-step
+                    text-scale-mode-amount) 1)
+              (if (car (window-margins))
+                  (car (window-margins)) 1)
+              ))))
+  (advice-add #'linum-update-window :after #'linum-update-window-scale-fix))
 
 
 (use-package flymd