[Emacs-diffs] /srv/bzr/emacs/trunk r102287: * src/xfns.c (set_machine_and_pid_properties): Let X set WM_CLIENT_MACHINE.

[Jan D]

------------------------------------------------------------
revno: 102287
committer: Jan D <address@hidden>
branch nick: trunk
timestamp: Sun 2010-11-07 12:25:55 +0100
message:
  * src/xfns.c (set_machine_and_pid_properties): Let X set WM_CLIENT_MACHINE.
modified:
  src/ChangeLog
  src/xfns.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2010-11-07 11:16:54 +0000
+++ b/src/ChangeLog     2010-11-07 11:25:55 +0000
@@ -1,5 +1,7 @@
 2010-11-07  Jan Djärv  <address@hidden>
 
+       * xfns.c (set_machine_and_pid_properties): Let X set WM_CLIENT_MACHINE.
+
        * xdisp.c (note_mode_line_or_margin_highlight): Initialize
        Cursor to No_Cursor for HAVE_WINDOW_SYSTEM also.
 

=== modified file 'src/xfns.c'
--- a/src/xfns.c        2010-11-06 13:45:37 +0000
+++ b/src/xfns.c        2010-11-07 11:25:55 +0000
@@ -3078,25 +3078,11 @@
 static void
 set_machine_and_pid_properties (struct frame *f)
 {
-  /* See the above comment "Note: Encoding strategy".  */
-  XTextProperty text;
-  int bytes, stringp;
-  int do_free_text_value = 0;
   long pid = (long) getpid ();
 
-  text.value = x_encode_text (Vsystem_name,
-                              Qcompound_text, 0, &bytes, &stringp,
-                              &do_free_text_value);
-  text.encoding = (stringp ? XA_STRING
-                   : FRAME_X_DISPLAY_INFO (f)->Xatom_COMPOUND_TEXT);
-  text.format = 8;
-  text.nitems = bytes;
-  XSetWMClientMachine (FRAME_X_DISPLAY (f),
-                       FRAME_OUTER_WINDOW (f),
-                       &text);
-  if (do_free_text_value)
-    xfree (text.value);
-
+  /* This will set WM_CLIENT_MACHINE and WM_LOCALE_NAME.  */
+  XSetWMProperties (FRAME_X_DISPLAY (f), FRAME_OUTER_WINDOW (f), NULL, NULL,
+                    NULL, 0, NULL, NULL, NULL);
   XChangeProperty (FRAME_X_DISPLAY (f),
                    FRAME_OUTER_WINDOW (f),
                    XInternAtom (FRAME_X_DISPLAY (f),