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 {