Mercurial > emacs
diff src/macfns.c @ 90081:b1b6eac1aaa3
* macfns.c (Fx_create_frame, x_create_tip_frame): Fix crash.
Not sure if it's unnecessary.
| author | Steven Tamm <steventamm@mac.com> |
|---|---|
| date | Tue, 18 Jan 2005 04:50:08 +0000 |
| parents | c43084d0b52b |
| children | 72cf6261961e |
line wrap: on
line diff
--- a/src/macfns.c Mon Jan 17 12:10:35 2005 +0000 +++ b/src/macfns.c Tue Jan 18 04:50:08 2005 +0000 @@ -1,4 +1,4 @@ -s/* Graphical user interface functions for Mac OS. +/* Graphical user interface functions for Mac OS. Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -2687,16 +2687,14 @@ BLOCK_INPUT; /* First, try whatever font the caller has specified. */ -#if 0 /* MAC_TODO: This crashed */ if (STRINGP (font)) { tem = Fquery_fontset (font, Qnil); if (STRINGP (tem)) - font = x_new_fontset (f, SDATA (tem)); + font = x_new_fontset (f, tem); else font = x_new_font (f, SDATA (font)); } -#endif /* Try out a font which we hope has bold and italic variations. */ if (! STRINGP (font)) @@ -3805,16 +3803,14 @@ BLOCK_INPUT; /* First, try whatever font the caller has specified. */ -#if 0 /* MAC_TODO: This crashed */ if (STRINGP (font)) { tem = Fquery_fontset (font, Qnil); if (STRINGP (tem)) - font = x_new_fontset (f, SDATA (tem)); + font = x_new_fontset (f, tem); else font = x_new_font (f, SDATA (font)); } -#endif /* Try out a font which we hope has bold and italic variations. */ if (! STRINGP (font))