emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 115f5ff 2/4: yasnippet.el (yas--describe-pretty-table): Cl


From: Noam Postavsky
Subject: [elpa] master 115f5ff 2/4: yasnippet.el (yas--describe-pretty-table): Cleanup.
Date: Sun, 03 Apr 2016 16:10:14 +0000

branch: master
commit 115f5ffff09d07346a553852494f055ca7069a7c
Author: Noam Postavsky <address@hidden>
Commit: Noam Postavsky <address@hidden>

    yasnippet.el (yas--describe-pretty-table): Cleanup.
---
 yasnippet.el |   22 ++++++++++------------
 1 files changed, 10 insertions(+), 12 deletions(-)

diff --git a/yasnippet.el b/yasnippet.el
index 428770c..e2772b0 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)))
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]