From 115f5ffff09d07346a553852494f055ca7069a7c Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Sat, 2 Apr 2016 10:38:05 -0400 Subject: [PATCH] yasnippet.el (yas--describe-pretty-table): Cleanup. --- yasnippet.el | 22 ++++++++++------------ 1 file changed, 10 insertions(+), 12 deletions(-) diff --git a/yasnippet.el b/yasnippet.el index 428770ceb..e2772b067 100644 --- a/yasnippet.el +++ b/yasnippet.el @@ -2731,19 +2731,17 @@ and `kill-buffer' instead." "(a)"))) (key-description-string (key-description (yas--template-keybinding p))) (template-key-padding (if (string= key-description-string "") nil ? ))) - (insert group " ") - (insert condition-string " ") - (insert name - (if (string-match "\\.\\.\\.$" name) - "'" - " ") - " ") - (insert (truncate-string-to-width (or (yas--template-key p) "") + (insert group " " + condition-string " " + name (if (string-match "\\.\\.\\.$" name) + "'" " ") + " " + (truncate-string-to-width (or (yas--template-key p) "") 15 0 template-key-padding "...") - (if template-key-padding (byte-to-string template-key-padding) "")) - (insert (truncate-string-to-width key-description-string - 15 0 nil "...")) - (insert "\n")))) + (or template-key-padding "") + (truncate-string-to-width key-description-string + 15 0 nil "...") + "\n")))) groups-hash))) -- 2.39.2