diff options
author | Mark Oteiza <mvoteiza@udel.edu> | 2016-11-22 11:09:15 -0500 |
---|---|---|
committer | Mark Oteiza <mvoteiza@udel.edu> | 2016-11-22 11:09:15 -0500 |
commit | c542fab20f53374dd0c71dce949ef370fc76fa48 (patch) | |
tree | 08af8f268d832f693f422827dbb66ba76b39827e /lisp/ibuffer.el | |
parent | afe2997119a5e6b108851f2e236037da1d4acef2 (diff) | |
download | emacs-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.el | 2 |
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) |