diff options
| -rw-r--r-- | .emacs | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -128,6 +128,12 @@ (defvar-local my/centered-width 'fill-column) (defvar-local my/centered-set-right-margin nil) +(defun my/centered--undo-margins (&optional _size window-to-split) + (when (buffer-local-value 'my/centered-mode (window-buffer window-to-split)) + (set-window-margins window-to-split nil nil))) + +(advice-add 'split-window-right :before 'my/centered--undo-margins) + (define-minor-mode my/centered-mode "Update margins to keep content centered." :init-value nil |
