[Emacs-diffs] emacs/lisp ChangeLog international/mule-diag.el

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/12/05 00:21:46

Modified files:
        lisp           : ChangeLog 
        lisp/international: mule-diag.el 

Log message:
        * international/mule-diag.el (mule-diag): Display the window
          system version in a less laconic way.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14917&r2=1.14918
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/mule-diag.el?cvsroot=emacs&r1=1.121&r2=1.122

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14917
retrieving revision 1.14918
diff -u -b -r1.14917 -r1.14918
--- ChangeLog   5 Dec 2008 00:02:10 -0000       1.14917
+++ ChangeLog   5 Dec 2008 00:21:40 -0000       1.14918
@@ -1,3 +1,8 @@
+2008-12-05  Juanma Barranquero  <address@hidden>
+
+       * international/mule-diag.el (mule-diag): Display the window
+       system version in a less laconic way.
+
 2008-12-04  Juanma Barranquero  <address@hidden>
 
        * ibuffer.el (ibuffer-sort-bufferlist): Require ibuf-ext

Index: international/mule-diag.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/mule-diag.el,v
retrieving revision 1.121
retrieving revision 1.122
diff -u -b -r1.121 -r1.122
--- international/mule-diag.el  4 Dec 2008 15:23:57 -0000       1.121
+++ international/mule-diag.el  5 Dec 2008 00:21:46 -0000       1.122
@@ -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")