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

each fontset description.

2 files changed, 7 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd5cb9bcac7..0b4a7aaea81 100644
--- 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 d9ac587231e..cccf65b8051 100644
--- 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