comparison src/xterm.c @ 69595:f57904524ef9

(x_term_init): Remove unnecessary GCPRO.
author Kenichi Handa <handa@m17n.org>
date Mon, 20 Mar 2006 06:23:55 +0000
parents 1ea752831737
children 761eaec1aae4
comparison
equal deleted inserted replaced
69594:ae6acd1629af 69595:f57904524ef9
10202 /* NULL window -> events for all windows go to our function */ 10202 /* NULL window -> events for all windows go to our function */
10203 gdk_window_add_filter (NULL, event_handler_gdk, NULL); 10203 gdk_window_add_filter (NULL, event_handler_gdk, NULL);
10204 10204
10205 /* Load our own gtkrc if it exists. */ 10205 /* Load our own gtkrc if it exists. */
10206 { 10206 {
10207 struct gcpro gcpro1, gcpro2;
10208 char *file = "~/.emacs.d/gtkrc"; 10207 char *file = "~/.emacs.d/gtkrc";
10209 Lisp_Object s, abs_file; 10208 Lisp_Object s, abs_file;
10210 10209
10211 GCPRO2 (s, abs_file);
10212 s = make_string (file, strlen (file)); 10210 s = make_string (file, strlen (file));
10213 abs_file = Fexpand_file_name (s, Qnil); 10211 abs_file = Fexpand_file_name (s, Qnil);
10214 10212
10215 if (! NILP (abs_file) && !NILP (Ffile_readable_p (abs_file))) 10213 if (! NILP (abs_file) && !NILP (Ffile_readable_p (abs_file)))
10216 gtk_rc_parse (SDATA (abs_file)); 10214 gtk_rc_parse (SDATA (abs_file));