[elpa] externals/company 3bc91c8 1/2: Fix width of tooltip offset lines number display

[ELPA Syncer]

branch: externals/company
commit 3bc91c852a11c3a52c0410a18e50c5512251a5a6
Author: YE <yugenekr@gmail.com>
Commit: YE <yugenekr@gmail.com>

    Fix width of tooltip offset lines number display
---
 company.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/company.el b/company.el
index 6d34b78..73748b0 100644
--- a/company.el
+++ b/company.el
@@ -3172,7 +3172,7 @@ If SHOW-VERSION is non-nil, show the version in the echo 
area."
           (numbered (if company-show-numbers 0 99999))
           new)
       (when previous
-        (push (company--scrollpos-line previous width) new))
+        (push (company--scrollpos-line previous width left-margin-size) new))
 
       (dotimes (i len)
         (let* ((item (pop items))
@@ -3199,7 +3199,7 @@ If SHOW-VERSION is non-nil, show the version in the echo 
area."
                 new)))
 
       (when remainder
-        (push (company--scrollpos-line remainder width) new))
+        (push (company--scrollpos-line remainder width left-margin-size) new))
 
       (cons
        left-margin-size
@@ -3218,10 +3218,10 @@ If SHOW-VERSION is non-nil, show the version in the 
echo area."
                   'company-scrollbar-fg
                 'company-scrollbar-bg)))
 
-(defun company--scrollpos-line (text width)
+(defun company--scrollpos-line (text width right-margin-width)
   (propertize (concat (company-space-string company-tooltip-margin)
                       (company-safe-substring text 0 width)
-                      (company-space-string company-tooltip-margin))
+                      (company-space-string right-margin-width))
               'face 'company-tooltip))
 
 ;; show