diff options
| -rw-r--r-- | modeline.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/modeline.el b/modeline.el index 49c5f38..ee2c0fd 100644 --- a/modeline.el +++ b/modeline.el @@ -24,6 +24,9 @@ ;;; Code: +(defvar modeline-right-offset 6 + "An offset to adjust the modeline alignment.") + ;;;###autoload (defun modeline-format-main () "The main mode line format." @@ -38,7 +41,8 @@ 'space :width (list - (- (window-pixel-width) left-len right-len)))))) + (- (window-pixel-width) left-len right-len + (- modeline-right-offset))))))) (concat left middle right))) (setq-default mode-line-format '("%e" (:eval (modeline-format-main)))) @@ -57,7 +61,8 @@ 'space :width (list - (- (window-pixel-width) left-len right-len)))))) + (- (window-pixel-width) left-len right-len + (- modeline-right-offset))))))) (concat left middle right))) ;;;###autoload |