mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-19 10:22:27 +00:00
Code Issues Releases Activity

(x_term_init): Don't call get_system_name.

Browse Source
This commit is contained in:
Karl Heuer 1994-06-15 04:48:02 +00:00
parent c5507689ba
commit becadff8d8
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/xterm.c
View File

@ -176,8 +176,8 @@ static FONT_TYPE *icon_font_info;
/* Stuff for dealing with the main icon title. */ /* Stuff for dealing with the main icon title. */
extern Lisp_Object Vcommand_line_args; extern Lisp_Object Vcommand_line_args, Vsystem_name;
char *hostname, *x_id_name; char *x_id_name;
/* Initial values of argv and argc. */ /* Initial values of argv and argc. */
extern char **initial_argv; extern char **initial_argv;
@ -6114,11 +6114,11 @@ Check the DISPLAY environment variable or use \"-d\"\n",
#if 0 #if 0
XSetAfterFunction (x_current_display, x_trace_wire); XSetAfterFunction (x_current_display, x_trace_wire);
#endif /* ! 0 */ #endif /* ! 0 */
hostname = get_system_name ();
x_id_name = (char *) xmalloc (XSTRING (Vinvocation_name)->size x_id_name = (char *) xmalloc (XSTRING (Vinvocation_name)->size
+ strlen (hostname) + XSTRING (Vsystem_name)->size
+ 2); + 2);
sprintf (x_id_name, "%s@%s", XSTRING (Vinvocation_name)->data, hostname); sprintf (x_id_name, "%s@%s",
XSTRING (Vinvocation_name)->data, XSTRING (Vsystem_name)->data);
} }
/* Figure out which modifier bits mean what. */ /* Figure out which modifier bits mean what. */