[elpa] master b425d82: Make the debbugs display more compact so that you can read the titles

[Lars Ingebrigtsen]

branch: master
commit b425d829ff71ca2f6d8b4ff9ca5f335fb84cf749
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make the debbugs display more compact so that you can read the titles
---
 packages/debbugs/debbugs-gnu.el | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 4e1d5dc..8e74b12 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -939,12 +939,11 @@ Used instead of `tabulated-list-print-entry'."
                state))
       ;; Insert submitter.
       (indent-to (setq pos (+ pos state-length 1)) 1)
-      (insert "[" (if (> (length submitter) (- submitter-length 2))
-                     (propertize (substring submitter 0 (- submitter-length 2))
-                                 'help-echo submitter)
-                   submitter))
+      (insert (if (> (length submitter) submitter-length)
+                 (propertize (substring submitter 0 submitter-length)
+                             'help-echo submitter)
+               submitter))
       (indent-to (+ pos (1- submitter-length)))
-      (insert "]")
       ;; Insert title.
       (indent-to (setq pos (+ pos submitter-length 1)) 1)
       (insert (propertize title 'help-echo title))
@@ -1084,8 +1083,8 @@ Interactively, it is non-nil with the prefix argument."
   (set (make-local-variable 'debbugs-gnu-local-suppress)
        debbugs-gnu-current-suppress)
   (setq tabulated-list-format [("Id"         5 debbugs-gnu-sort-id)
-                              ("State"     20 debbugs-gnu-sort-state)
-                              ("Submitter" 25 debbugs-gnu-sort-submitter)
+                              ("State"     10 debbugs-gnu-sort-state)
+                              ("Submitter" 18 debbugs-gnu-sort-submitter)
                               ("Title"     10 debbugs-gnu-sort-title)])
   (setq tabulated-list-sort-key (cons "Id" nil))
   (setq tabulated-list-printer #'debbugs-gnu-print-entry)