Mercurial > hg > xemacs-beta
comparison src/faces.c @ 219:262b8bb4a523 r20-4b8
Import from CVS: tag r20-4b8
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:09:35 +0200 |
parents | d44af0c54775 |
children | 2c611d1463a6 |
comparison
equal
deleted
inserted
replaced
218:c9f226976f56 | 219:262b8bb4a523 |
---|---|
1652 make_int (frm->height), | 1652 make_int (frm->height), |
1653 Qnil); | 1653 Qnil); |
1654 } | 1654 } |
1655 } | 1655 } |
1656 #endif /* HAVE_X_WINDOWS */ | 1656 #endif /* HAVE_X_WINDOWS */ |
1657 #ifdef HAVE_MS_WINDOWS | |
1658 if (CONSOLE_TYPESYM_MSWINDOWS_P (FRAME_TYPE (frm))) | |
1659 { | |
1660 /* Cause the frame size in characters to remain the same when the font | |
1661 * changes, at the expense of changing the frame size in pixels. */ | |
1662 if (EQ (name, Qfont)) | |
1663 { | |
1664 Fset_frame_size (frame, | |
1665 make_int (frm->width), | |
1666 make_int (frm->height), | |
1667 Qnil); | |
1668 } | |
1669 } | |
1670 #endif /* HAVE_MS_WINDOWS */ | |
1657 } | 1671 } |
1658 | 1672 |
1659 static void | 1673 static void |
1660 update_EmacsFrames (Lisp_Object locale, Lisp_Object name) | 1674 update_EmacsFrames (Lisp_Object locale, Lisp_Object name) |
1661 { | 1675 { |