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

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

[elpa] externals/company 93c4db4 2/2: Merge pull request #1112 from yuga


From: ELPA Syncer
Subject: [elpa] externals/company 93c4db4 2/2: Merge pull request #1112 from yugaego/fix-qa-column
Date: Wed, 2 Jun 2021 21:57:09 -0400 (EDT)

branch: externals/company
commit 93c4db4b213430a5cbc96b37e466ac18791285cf
Merge: ee3177c fa1110d
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: GitHub <noreply@github.com>

    Merge pull request #1112 from yugaego/fix-qa-column
    
    Fix quick-access column formatting
---
 company.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/company.el b/company.el
index 307b6df..290416e 100644
--- a/company.el
+++ b/company.el
@@ -2987,7 +2987,9 @@ If SHOW-VERSION is non-nil, show the version in the echo 
area."
           (company-safe-substring old (+ offset (length new)))))
 
 (defun company--show-numbers (numbered)
-  (format " %d" (mod numbered 10)))
+  (format " %s" (if (<= numbered 10)
+                    (mod numbered 10)
+                  " ")))
 
 (defsubst company--window-height ()
   (if (fboundp 'window-screen-lines)
@@ -3177,7 +3179,7 @@ If SHOW-VERSION is non-nil, show the version in the echo 
area."
                (left (nth 2 item))
                (right (company-space-string company-tooltip-margin))
                (width width))
-          (when (< numbered 10)
+          (when company-show-numbers
             (cl-decf width 2)
             (cl-incf numbered)
             (setf (if (eq company-show-numbers 'left) left right)



reply via email to

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