Mercurial > emacs
comparison src/xdisp.c @ 55183:b4f51693f2db
(x_produce_glyphs): Fix last change; handle newline in
header line strings.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Tue, 27 Apr 2004 08:48:12 +0000 |
parents | 491a6ea7f8c4 |
children | 7e5d16ca1ee2 1a68e4b22355 |
comparison
equal
deleted
inserted
replaced
55182:bd90e5660360 | 55183:b4f51693f2db |
---|---|
18706 Lisp_Object lsp, lh; | 18706 Lisp_Object lsp, lh; |
18707 | 18707 |
18708 it->pixel_width = 0; | 18708 it->pixel_width = 0; |
18709 it->nglyphs = 0; | 18709 it->nglyphs = 0; |
18710 | 18710 |
18711 lh = Fget_text_property (IT_CHARPOS (*it), Qline_height, it->w->buffer); | 18711 lh = Fget_text_property (IT_CHARPOS (*it), Qline_height, it->object); |
18712 | 18712 |
18713 if (EQ (lh, Qt)) | 18713 if (EQ (lh, Qt)) |
18714 { | 18714 { |
18715 it->use_default_face = 1; | 18715 it->use_default_face = 1; |
18716 font = FRAME_FONT (it->f); | 18716 font = FRAME_FONT (it->f); |
18758 | 18758 |
18759 if (explicit_height > it->ascent + it->descent) | 18759 if (explicit_height > it->ascent + it->descent) |
18760 it->ascent = explicit_height - it->descent; | 18760 it->ascent = explicit_height - it->descent; |
18761 } | 18761 } |
18762 | 18762 |
18763 lsp = Fget_text_property (IT_CHARPOS (*it), Qline_spacing, it->w->buffer); | 18763 lsp = Fget_text_property (IT_CHARPOS (*it), Qline_spacing, it->object); |
18764 if (INTEGERP (lsp)) | 18764 if (INTEGERP (lsp)) |
18765 extra_line_spacing = XINT (lsp); | 18765 extra_line_spacing = XINT (lsp); |
18766 else if (FLOATP (lsp)) | 18766 else if (FLOATP (lsp)) |
18767 extra_line_spacing = (it->phys_ascent + it->phys_descent) * XFLOAT_DATA (lsp); | 18767 extra_line_spacing = (it->phys_ascent + it->phys_descent) * XFLOAT_DATA (lsp); |
18768 } | 18768 } |