Sideline fix
This commit is contained in:
parent
eb40ef7ae3
commit
0ad1cd14a2
1 changed files with 9 additions and 1 deletions
10
init.el
10
init.el
|
@ -345,7 +345,15 @@
|
||||||
:hook (flymake-mode . sideline-mode)
|
:hook (flymake-mode . sideline-mode)
|
||||||
:custom
|
:custom
|
||||||
(sideline-flymake-display-mode 'line)
|
(sideline-flymake-display-mode 'line)
|
||||||
(sideline-backends-right '(sideline-flymake)))
|
(sideline-backends-right '(sideline-flymake))
|
||||||
|
:config
|
||||||
|
;; FIXME https://github.com/emacs-sideline/sideline/issues/13
|
||||||
|
(require 'sideline)
|
||||||
|
(defun ccr-sideline--align (&rest lengths)
|
||||||
|
"Align sideline string by LENGTHS from the right of the window."
|
||||||
|
(list (* (window-font-width)
|
||||||
|
(+ (apply #'+ lengths) (if (display-graphic-p) 1 3)))))
|
||||||
|
(advice-add 'sideline--align :override #'ccr-sideline--align))
|
||||||
|
|
||||||
(use-package nix-mode
|
(use-package nix-mode
|
||||||
:hook ((nix-mode . eglot-ensure)
|
:hook ((nix-mode . eglot-ensure)
|
||||||
|
|
Reference in a new issue