Subject: bug#6423: closed (Re: bug#6423: [describe-char PATCH 2/2] describe-char: remove superfluous space at end of "Unicode data" line)

From: [email-masked] (GNU bug Tracking System)
Date: Sat, 19 Jun 2010 02:41:02 +0000

Your bug report

#6423: [describe-char PATCH 2/2] describe-char: remove superfluous space at end of "Unicode data" line

which was filed against the emacs package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
6423: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=6423
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#6423: [describe-char PATCH 2/2] describe-char: remove superfluous space at end of "Unicode data" line
From: Glenn Morris <[email-masked]>
To: [email-masked]
Date: Fri, 18 Jun 2010 22:40:28 -0400
List-Id: <debbugs-submit.debbugs.gnu.org>

OK; applied.

Subject: [describe-char PATCH 2/2] describe-char: remove superfluous space at end of "Unicode data" line
From: Gustav Hållberg <[email-masked]>
To: [email-masked]
Date: Mon, 14 Jun 2010 14:23:50 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

This prevents annoying markup if the trailing-whitespace face is used.
---
 lisp/descr-text.el |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 51f7a77..d66aa88 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -618,7 +618,7 @@ as well as widgets, buttons, overlays, and text properties."
               ,@(if (not eight-bit-p)
                     (let ((unicodedata (describe-char-unicode-data char)))
                       (if unicodedata
-                          (cons (list "Unicode data" " ") unicodedata))))))
+                          (cons (list "Unicode data" "") unicodedata))))))
       (setq max-width (apply 'max (mapcar (lambda (x)
                                             (if (cadr x) (length (car x)) 0))
                                           item-list)))
@@ -642,7 +642,8 @@ as well as widgets, buttons, overlays, and text properties."
                               (window-width))
                       (insert "\n")
                       (indent-to (1+ max-width)))
-                    (insert " " clm)))
+                    (unless (zerop (length clm))
+                      (insert " " clm))))
                 (insert "\n"))))
 
           (when overlays