Mercurial > hg > xemacs-beta
comparison src/frame-x.c @ 1746:18d2b8dabcf7
[xemacs-hg @ 2003-10-14 16:34:54 by stephent]
NAS version #defines <878ynnaipw.fsf@tleepslib.sk.tsukuba.ac.jp>
XtSetArg idiom fix <874qybaihp.fsf@tleepslib.sk.tsukuba.ac.jp>
author | stephent |
---|---|
date | Tue, 14 Oct 2003 16:34:57 +0000 |
parents | a8d8f419b459 |
children | 51ce4f55d8c3 |
comparison
equal
deleted
inserted
replaced
1745:d91e7fd568fd | 1746:18d2b8dabcf7 |
---|---|
2726 else if (EQ (name, Qfont)) | 2726 else if (EQ (name, Qfont)) |
2727 { | 2727 { |
2728 Lisp_Object font = FACE_FONT (Vdefault_face, frame, Vcharset_ascii); | 2728 Lisp_Object font = FACE_FONT (Vdefault_face, frame, Vcharset_ascii); |
2729 | 2729 |
2730 if (!EQ (font, Vthe_null_font_instance)) | 2730 if (!EQ (font, Vthe_null_font_instance)) |
2731 XtSetArg (al[ac], XtNfont, | 2731 { |
2732 (void *) FONT_INSTANCE_X_FONT (XFONT_INSTANCE (font))); | 2732 XtSetArg (al[ac], XtNfont, |
2733 ac++; | 2733 (void *) FONT_INSTANCE_X_FONT (XFONT_INSTANCE (font))); |
2734 ac++; | |
2735 } | |
2734 } | 2736 } |
2735 else | 2737 else |
2736 abort (); | 2738 abort (); |
2737 | 2739 |
2738 XtSetValues (FRAME_X_TEXT_WIDGET (frm), al, ac); | 2740 XtSetValues (FRAME_X_TEXT_WIDGET (frm), al, ac); |