diff options
Diffstat (limited to 'src/macfns.c')
-rw-r--r-- | src/macfns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/macfns.c b/src/macfns.c index 0f40127637a..2b8c24db3b3 100644 --- a/src/macfns.c +++ b/src/macfns.c @@ -4644,8 +4644,8 @@ ID is specified by either an integer or a float. */) Lisp_Object result; check_mac (); - CHECK_NUMBER_OR_FLOAT(id); - font_id = NUMBERP (id) ? XINT (id) : (ATSUFontID) XFLOAT (id); + CHECK_NUMBER_OR_FLOAT (id); + font_id = INTEGERP (id) ? XINT (id) : XFLOAT_DATA (id); BLOCK_INPUT; result = mac_atsu_font_face_attributes (font_id); UNBLOCK_INPUT; |