[elpa] externals/nano-modeline 7f2da518dd 2/3: Merge pull request #19 from hans-d/feat/box

[ELPA Syncer]

branch: externals/nano-modeline
commit 7f2da518dd9f3af1d94c456ee53a2ad27e47c821
Merge: b361798a02 6999b890fa
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: GitHub <noreply@github.com>

    Merge pull request #19 from hans-d/feat/box
    
    available width works with :box
---
 nano-modeline.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 80c5d55832..df651efd75 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -384,10 +384,11 @@ KEY mode name, for reference only. Easier to do lookups 
and/or replacements.
                                                    
'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)))
 
 ;; ---------------------------------------------------------------------