* lisp/international/mule-diag.el (mule-diag): Insert a newline after

each fontset description.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd5cb9bcac775d565f5aa9844a928ab0c702f9eb..0b4a7aaea813860d01dd0d1366922304f23fb5c8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-09-23  Andreas Schwab  <schwab@linux-m68k.org>
+
+       * international/mule-diag.el (mule-diag): Insert a newline after
+       each fontset description.
+
 2011-09-23  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * simple.el (delete-trailing-whitespace):

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index d9ac587231e92b9ea78c40fcde3d7784b46132a1..cccf65b80511ca085b3d553515c66a4c1c88c33f 100644 (file)
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -1139,7 +1139,8 @@ system which uses fontsets)."
        (insert "Fontset-Name\t\t\t\t\t\t  WDxHT Style\n")
        (insert "------------\t\t\t\t\t\t  ----- -----\n")
        (dolist (fontset (fontset-list))
-         (print-fontset fontset t)))
+         (print-fontset fontset t)
+         (insert "\n")))
       (help-print-return-message))))
 
 ;;;###autoload