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

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

[elpa] externals/nano-modeline 4fc50c88b3 3/3: Adjustment of spaces.


From: ELPA Syncer
Subject: [elpa] externals/nano-modeline 4fc50c88b3 3/3: Adjustment of spaces.
Date: Thu, 6 Jan 2022 07:57:39 -0500 (EST)

branch: externals/nano-modeline
commit 4fc50c88b336bd95d6d348477a550302f0206d9f
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Adjustment of spaces.
---
 nano-modeline.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index df651efd75..4e601fdea3 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -95,13 +95,13 @@ Modeline is composed as:
                  (const :tag "Bottom" bottom))
   :group 'nano-modeline)
 
-(defcustom nano-modeline-space-top +0.100
+(defcustom nano-modeline-space-top +0.15
   "Space adjustment for top of modeline
 Possitive is upwards"
   :type 'float
   :group 'nano-modeline)
 
-(defcustom nano-modeline-space-bottom -0.125
+(defcustom nano-modeline-space-bottom -0.20
   "Space adjustment for bottom of modeline
 Negative is downwards."
   :type 'float
@@ -388,7 +388,7 @@ KEY mode name, for reference only. Easier to do lookups 
and/or replacements.
         (right-len (length (format-mode-line right))))
     (concat
      left 
-     (propertize " " 'display `(space :align-to (- right ,(- right-len 2))))
+     (propertize " " 'display `(space :align-to (- right ,(- right-len 0))))
      right)))
 
 ;; ---------------------------------------------------------------------



reply via email to

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