master c30f6da 1/2: Fix args of truncate-string-to-width in ibuffer-compile-make-substring-form

[Juri Linkov]

branch: master
commit c30f6da0da0469f73fad205b134b1de82a1b1b65
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    Fix args of truncate-string-to-width in ibuffer-compile-make-substring-form
    
    * lisp/ibuffer.el (ibuffer-compile-make-substring-form): Fix args of
    truncate-string-to-width call (bug#41250)
---
 lisp/ibuffer.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index c9a7488..8ff3b56 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1597,7 +1597,7 @@ If point is on a group name, this function operates on 
that group."
 (defun ibuffer-compile-make-substring-form (strvar maxvar from-end-p)
   (if from-end-p
       ;; FIXME: not sure if this case is correct (Bug#24972)
-      `(truncate-string-to-width str strlen (- strlen ,maxvar) nil ?\s)
+      `(truncate-string-to-width str strlen (- strlen ,maxvar) ?\s)
     `(truncate-string-to-width ,strvar ,maxvar nil ?\s)))
 
 (defun ibuffer-compile-make-format-form (strvar widthform alignment)