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

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

[elpa] externals/company b2a0993: Don't touch the left-margin global var


From: ELPA Syncer
Subject: [elpa] externals/company b2a0993: Don't touch the left-margin global var
Date: Mon, 29 Mar 2021 11:57:07 -0400 (EDT)

branch: externals/company
commit b2a0993e61afd149c9ea3e2ca3a5268b2143af4a
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: Dmitry Gutov <dgutov@yandex.ru>

    Don't touch the left-margin global var
    
    Fixes #1079
---
 company.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/company.el b/company.el
index e42c05d..b2d1c5e 100644
--- a/company.el
+++ b/company.el
@@ -2943,15 +2943,15 @@ If SHOW-VERSION is non-nil, show the version in the 
echo area."
     (dotimes (_ len)
       (let* ((value (pop lines-copy))
              (annotation (company-call-backend 'annotation value))
-             (left-margin (or (pop left-margins)
-                              (company-space-string left-margin-size))))
+             (left (or (pop left-margins)
+                       (company-space-string left-margin-size))))
         (setq value (company--clean-string value))
         (when annotation
           (setq annotation (company--clean-string annotation))
           (when company-tooltip-align-annotations
             ;; `lisp-completion-at-point' adds a space.
             (setq annotation (string-trim-left annotation))))
-        (push (list value annotation left-margin) items)
+        (push (list value annotation left) items)
         (setq width (max (+ (length value)
                             (if (and annotation 
company-tooltip-align-annotations)
                                 (1+ (length annotation))



reply via email to

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