diff options
Diffstat (limited to 'src/macfns.c')
| -rw-r--r-- | src/macfns.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/src/macfns.c b/src/macfns.c index 11fb088e30d..7254ac41752 100644 --- a/src/macfns.c +++ b/src/macfns.c | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | s/* Graphical user interface functions for Mac OS. | 1 | /* Graphical user interface functions for Mac OS. |
| 2 | Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc. | 2 | Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| @@ -2687,16 +2687,14 @@ This function is an internal primitive--use `make-frame' instead. */) | |||
| 2687 | 2687 | ||
| 2688 | BLOCK_INPUT; | 2688 | BLOCK_INPUT; |
| 2689 | /* First, try whatever font the caller has specified. */ | 2689 | /* First, try whatever font the caller has specified. */ |
| 2690 | #if 0 /* MAC_TODO: This crashed */ | ||
| 2691 | if (STRINGP (font)) | 2690 | if (STRINGP (font)) |
| 2692 | { | 2691 | { |
| 2693 | tem = Fquery_fontset (font, Qnil); | 2692 | tem = Fquery_fontset (font, Qnil); |
| 2694 | if (STRINGP (tem)) | 2693 | if (STRINGP (tem)) |
| 2695 | font = x_new_fontset (f, SDATA (tem)); | 2694 | font = x_new_fontset (f, tem); |
| 2696 | else | 2695 | else |
| 2697 | font = x_new_font (f, SDATA (font)); | 2696 | font = x_new_font (f, SDATA (font)); |
| 2698 | } | 2697 | } |
| 2699 | #endif | ||
| 2700 | 2698 | ||
| 2701 | /* Try out a font which we hope has bold and italic variations. */ | 2699 | /* Try out a font which we hope has bold and italic variations. */ |
| 2702 | if (! STRINGP (font)) | 2700 | if (! STRINGP (font)) |
| @@ -3805,16 +3803,14 @@ x_create_tip_frame (dpyinfo, parms, text) | |||
| 3805 | 3803 | ||
| 3806 | BLOCK_INPUT; | 3804 | BLOCK_INPUT; |
| 3807 | /* First, try whatever font the caller has specified. */ | 3805 | /* First, try whatever font the caller has specified. */ |
| 3808 | #if 0 /* MAC_TODO: This crashed */ | ||
| 3809 | if (STRINGP (font)) | 3806 | if (STRINGP (font)) |
| 3810 | { | 3807 | { |
| 3811 | tem = Fquery_fontset (font, Qnil); | 3808 | tem = Fquery_fontset (font, Qnil); |
| 3812 | if (STRINGP (tem)) | 3809 | if (STRINGP (tem)) |
| 3813 | font = x_new_fontset (f, SDATA (tem)); | 3810 | font = x_new_fontset (f, tem); |
| 3814 | else | 3811 | else |
| 3815 | font = x_new_font (f, SDATA (font)); | 3812 | font = x_new_font (f, SDATA (font)); |
| 3816 | } | 3813 | } |
| 3817 | #endif | ||
| 3818 | 3814 | ||
| 3819 | /* Try out a font which we hope has bold and italic variations. */ | 3815 | /* Try out a font which we hope has bold and italic variations. */ |
| 3820 | if (! STRINGP (font)) | 3816 | if (! STRINGP (font)) |