branch: elpa/popup
commit 2f1c9d8324832a5aa07a8eb5ed29344e02045cf4
Author: Takafumi Arakaki <aka....@gmail.com>
Commit: Takafumi Arakaki <aka....@gmail.com>
Refactoring: new variable in popup-create-line-string
fixes @m2ym's comment on e5794f80c701d893f961dc1e9ca1f375ffdb104b
---
popup.el | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/popup.el b/popup.el
index e4c79a7..afddcb4 100644
--- a/popup.el
+++ b/popup.el
@@ -413,13 +413,14 @@ usual."
(string (car (popup-substring-by-width string content-width)))
(string-width (string-width string))
(spacing (max (- popup-width string-width summary-width)
- (if (> popup-width string-width) 1 0))))
+ (if (> popup-width string-width) 1 0)))
+ (truncated-summary
+ (car (popup-substring-by-width
+ summary (max (- popup-width string-width spacing) 0)))))
(concat margin-left
string
(make-string spacing ? )
- (car
- (popup-substring-by-width
- summary (max (- popup-width string-width spacing) 0)))
+ truncated-summary
symbol
margin-right)))
