procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix typo in tabulated-list-print-entry

Browse source
This commit is contained in:
Leo Liu 2011-04-10 22:21:26 +08:00
parent 368f40905f
commit 37f1c9309e
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/tabulated-list.el
View file

@ -271,7 +271,7 @@ of column descriptors."
;; Truncate labels if necessary.
(and (> width 6)
(> (length label) width)
(setq label (concat (substring desc 0 (- width 3))
(setq label (concat (substring label 0 (- width 3))
"...")))
(if (stringp desc)
(insert (propertize label 'help-echo help-echo))