[nongnu] elpa/helm f30a4bd822 1/2: Fix len of truncated buffers with icons

[ELPA Syncer]

branch: elpa/helm
commit f30a4bd8224b1d1935a5774cec74ddf6a50785d6
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Fix len of truncated buffers with icons
---
 helm-buffers.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/helm-buffers.el b/helm-buffers.el
index 6457f10d48..a29259a2b9 100644
--- a/helm-buffers.el
+++ b/helm-buffers.el
@@ -1042,7 +1042,10 @@ vertically."
 
 (defun helm-buffers--quote-truncated-buffer (buffer)
   (let ((bufname (and (bufferp buffer)
-                      (buffer-name buffer))))
+                      (buffer-name buffer)))
+        (maxlen (if helm-buffers-show-icons
+                    (- helm-buffer-max-length 2)
+                  helm-buffer-max-length)))
     (when (and bufname
                (file-remote-p (with-current-buffer bufname
                                 default-directory)))
@@ -1051,9 +1054,7 @@ vertically."
       (regexp-quote
        (if (and helm-buffer-max-length
                 helm-buffer-details-flag)
-           (helm-substring-by-width
-            bufname helm-buffer-max-length
-            "")
+           (helm-substring-by-width bufname maxlen "")
          bufname)))))
 
 (defun helm-buffers-persistent-kill (_buffer)