summaryrefslogtreecommitdiff
path: root/lisp/ibuffer.el
diff options
context:
space:
mode:
authorMark Oteiza <mvoteiza@udel.edu>2016-11-22 11:09:15 -0500
committerMark Oteiza <mvoteiza@udel.edu>2016-11-22 11:09:15 -0500
commitc542fab20f53374dd0c71dce949ef370fc76fa48 (patch)
tree08af8f268d832f693f422827dbb66ba76b39827e /lisp/ibuffer.el
parentafe2997119a5e6b108851f2e236037da1d4acef2 (diff)
downloademacs-c542fab20f53374dd0c71dce949ef370fc76fa48.tar.gz
; Fix previous change
strlen is already computed, just use the symbol. * lisp/ibuffer.el (ibuffer-compile-make-eliding-form): Use strlen.
Diffstat (limited to 'lisp/ibuffer.el')
-rw-r--r--lisp/ibuffer.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index dc5681c4659..51d7cb90755 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1571,7 +1571,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 (string-width str) (- strlen ,maxvar) nil ?\s)
+ `(truncate-string-to-width str strlen (- strlen ,maxvar) nil ?\s)
`(truncate-string-to-width ,strvar ,maxvar nil ?\s)))
(defun ibuffer-compile-make-format-form (strvar widthform alignment)