[elpa] master 2306c9c 054/173: Support whitespace-mode newline-mark

[Dmitry Gutov]

branch: master
commit 2306c9cb1ac7ef0e5c0120269c7f1c3a768e94b7
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    Support whitespace-mode newline-mark
    
    Fixes #370
---
 company.el |    4 ++++
 1 file changed, 4 insertions(+)

diff --git a/company.el b/company.el
index 5c20c05..8500a4d 100644
--- a/company.el
+++ b/company.el
@@ -2400,6 +2400,10 @@ If SHOW-VERSION is non-nil, show the version in the echo 
area."
                (version< emacs-version "24.4.51.5"))
       ;; http://debbugs.gnu.org/18384
       (cl-decf ww))
+    ;; whitespace-mode with newline-mark
+    (when (and buffer-display-table
+               (aref buffer-display-table ?\n))
+      (cl-decf ww (1- (length (aref buffer-display-table ?\n)))))
     ww))
 
 (defun company--replacement-string (lines old column nl &optional align-top)