[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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/company b2a0993: Don't touch the left-margin global var,
ELPA Syncer <=