Mercurial > emacs

comparison src/xfns.c @ 436:6e0a136fca4f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Michael I. Bushnell <mib@gnu.org>
date Tue, 26 Nov 1991 05:14:58 +0000
parents a60eafebd43f
children 8c615e453683
comparison
equal deleted inserted replaced
435:43e88c4db330 436:6e0a136fca4f
1422 Lisp_Object alist, param, screen_name; 1422 Lisp_Object alist, param, screen_name;
1423 char *attribute; 1423 char *attribute;
1424 enum resource_types type; 1424 enum resource_types type;
1425 { 1425 {
1426 register Lisp_Object tem; 1426 register Lisp_Object tem;
1427 int i;
1427 1428
1428 tem = Fassq (param, alist); 1429 tem = Fassq (param, alist);
1429 if (EQ (tem, Qnil)) 1430 if (EQ (tem, Qnil))
1430 tem = Fassq (param, Vdefault_screen_alist); 1431 tem = Fassq (param, Vdefault_screen_alist);
1431 if (EQ (tem, Qnil) && attribute) 1432 if (EQ (tem, Qnil) && attribute)
4415 defsubr (&Sx_uncontour_region); 4416 defsubr (&Sx_uncontour_region);
4416 defsubr (&Sx_color_display_p); 4417 defsubr (&Sx_color_display_p);
4417 defsubr (&Sx_defined_color); 4418 defsubr (&Sx_defined_color);
4418 #if 0 4419 #if 0
4419 defsubr (&Sx_track_pointer); 4420 defsubr (&Sx_track_pointer);
4420 #endif
4421 defsubr (&Sx_grab_pointer); 4421 defsubr (&Sx_grab_pointer);
4422 defsubr (&Sx_ungrab_pointer); 4422 defsubr (&Sx_ungrab_pointer);
4423 #endif
4423 #else 4424 #else
4424 defsubr (&Sx_get_default); 4425 defsubr (&Sx_get_default);
4425 defsubr (&Sx_store_cut_buffer); 4426 defsubr (&Sx_store_cut_buffer);
4426 defsubr (&Sx_get_cut_buffer); 4427 defsubr (&Sx_get_cut_buffer);
4427 defsubr (&Sx_set_face); 4428 defsubr (&Sx_set_face);