emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/nano-modeline 6999b890fa 1/3: adjust spacer


From: ELPA Syncer
Subject: [elpa] externals/nano-modeline 6999b890fa 1/3: adjust spacer
Date: Thu, 6 Jan 2022 07:57:39 -0500 (EST)

branch: externals/nano-modeline
commit 6999b890faa1f5e8f94b8053de8c8f29d375442c
Author: Hans Donner <hans@hansdonner.nl>
Commit: Hans Donner <hans@hansdonner.nl>

    adjust spacer
---
 nano-modeline.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 1d50db89b2..11d1515c06 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -275,10 +275,11 @@ Negative is downwards."
                                                    
'nano-modeline-inactive-primary))))
          (right (concat (propertize secondary 'face (if active 
'nano-modeline-active-secondary
                                                       
'nano-modeline-inactive-secondary))
-                        (propertize " " 'display `(raise 
,nano-modeline-space-bottom)))))
+                        (propertize " " 'display `(raise 
,nano-modeline-space-bottom))))
+        (right-len (length (format-mode-line right))))
     (concat
      left 
-     (propertize " " 'display `(space :align-to (- right ,(+ (length 
secondary) 1))))
+     (propertize " " 'display `(space :align-to (- right ,(- right-len 2))))
      right)))
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]