]> code.delx.au - gnu-emacs-elpa/commitdiff
Highlight last annotation character, too
authorDmitry Gutov <dgutov@yandex.ru>
Tue, 11 Mar 2014 13:25:23 +0000 (15:25 +0200)
committerDmitry Gutov <dgutov@yandex.ru>
Tue, 11 Mar 2014 13:25:23 +0000 (15:25 +0200)
company.el

index 0945b9a065132b8472dba64b91753b46c2ee1292..5ee3c66281e5f92041328c068fb7ccdb4aef4240 100644 (file)
@@ -1885,7 +1885,7 @@ Example: \(company-begin-with '\(\"foo\" \"foobar\" \"foobarbaz\"\)\)"
                                (1+ (length value))
                              (- width (length annotation)))
                          (length value))))
-         (ann-end (min (+ ann-start (length annotation)) width))
+         (ann-end (min (+ ann-start (length annotation)) (+ margin width)))
          (line (concat left
                        (if (or ann-truncate (not ann-ralign))
                            (company-safe-substring