[elpa] externals/osm 94fc097106 2/2: Improve header line

[ELPA Syncer]

branch: externals/osm
commit 94fc097106c2c84d2ee25509e0d0a571c7cb9bb6
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Improve header line
---
 osm.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/osm.el b/osm.el
index ca972af83c..807b6c9093 100644
--- a/osm.el
+++ b/osm.el
@@ -892,7 +892,6 @@ xmlns='http://www.w3.org/2000/svg' 
xmlns:xlink='http://www.w3.org/1999/xlink'>
      (concat
       (format #(" %7.2f°" 0 6 (face bold)) (osm--lat))
       (format #(" %7.2f°" 0 6 (face bold)) (osm--lon))
-      (format "   Z%-2d " osm--zoom)
       (propertize " " 'display '(space :align-to (- center 10)))
       (format "%3s " (if (>= meter 1000) (/ meter 1000) meter))
       (if (>= meter 1000) "km " "m ")
@@ -902,7 +901,8 @@ xmlns='http://www.w3.org/2000/svg' 
xmlns:xlink='http://www.w3.org/1999/xlink'>
                   'display `(space :width (,(floor (/ meter 
meter-per-pixel)))))
       (propertize " " 'face '(:inverse-video t)
                   'display '(space :width (3)))
-      (propertize " " 'display `(space :align-to (- right ,(+ 8 (length 
server)) (10))))
+      (propertize " " 'display `(space :align-to (- right ,(+ 13 (length 
server)) (10))))
+      (format " Z%-2d " osm--zoom)
       (osm--header-button " + " #'osm-zoom-in)
       (propertize " " 'display '(space :width (1)))
       (osm--header-button " - " #'osm-zoom-out)