# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1228436500 0
# Node ID a31a3e84b5b826cc674e4408b0e615df1331d399
# Parent  6b0f142e0e58f515a4d49a59ff06386fc19c33cb
* international/mule-diag.el (mule-diag): Display the window
  system version in a less laconic way.

diff -r 6b0f142e0e58 -r a31a3e84b5b8 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Dec 05 00:02:10 2008 +0000
+++ b/lisp/ChangeLog	Fri Dec 05 00:21:40 2008 +0000
@@ -1,3 +1,8 @@
+2008-12-05  Juanma Barranquero  <lekktu@gmail.com>
+
+	* international/mule-diag.el (mule-diag): Display the window
+	system version in a less laconic way.
+
 2008-12-04  Juanma Barranquero  <lekktu@gmail.com>
 
 	* ibuffer.el (ibuffer-sort-bufferlist): Require ibuf-ext
diff -r 6b0f142e0e58 -r a31a3e84b5b8 lisp/international/mule-diag.el
--- a/lisp/international/mule-diag.el	Fri Dec 05 00:02:10 2008 +0000
+++ b/lisp/international/mule-diag.el	Fri Dec 05 00:21:40 2008 +0000
@@ -1057,9 +1057,8 @@
 
       (insert-section 2 "Display")
       (if window-system
-	  (insert "Window-system: "
-		  (symbol-name window-system)
-		  (format "%s" window-system-version))
+	  (insert (format "Window-system: %s, version %s"
+			  window-system window-system-version))
 	(insert "Terminal: " (getenv "TERM")))
       (insert "\n\n")