# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 739086955 0
# Node ID 74c145e499ab8abc90b2a61f39b6b5089dafe4c7
# Parent  49b72d5833545ca01e5340f46a5a7eda7966ce9b
(x_window): Use Vxrdb_name for res_name field.
Delete the shortname stuff.

diff -r 49b72d583354 -r 74c145e499ab src/xfns.c
--- a/src/xfns.c	Thu Jun 03 05:50:43 1993 +0000
+++ b/src/xfns.c	Thu Jun 03 05:55:55 1993 +0000
@@ -1484,8 +1484,6 @@
   XSetWindowAttributes attributes;
   unsigned long attribute_mask;
   XClassHint class_hints;
-  char *shortname;
-  char *p;
 
   attributes.background_pixel = f->display.x->background_pixel;
   attributes.border_pixel = f->display.x->border_pixel;
@@ -1511,15 +1509,7 @@
 		     screen_visual, /* set in Fx_open_connection */
 		     attribute_mask, &attributes);
 
-  /* X resource names should not have periods in them.
-     So copy the frame name, discarding from the first period onward.  */
-  shortname = (char *) alloca (XSTRING (f->name)->size + 1);
-  bcopy (XSTRING (f->name)->data, shortname, XSTRING (f->name)->size + 1);
-  for (p = shortname; *p; p++)
-    if (*p == '.')
-      *p = 0;
-
-  class_hints.res_name = shortname;
+  class_hints.res_name = (char *) XSTRING (Vxrdb_name)->data;
   class_hints.res_class = EMACS_CLASS;
   XSetClassHint (x_current_display, FRAME_X_WINDOW (f), &class_hints);