Mercurial > emacs
changeset 55242:d57364949309
(syms_of_buffer) <line-spacing>: Allow float value.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 29 Apr 2004 22:36:11 +0000 |
parents | cebca4e25fae |
children | fa2641411db1 |
files | src/buffer.c |
diffstat | 1 files changed, 7 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/src/buffer.c Thu Apr 29 21:55:28 2004 +0000 +++ b/src/buffer.c Thu Apr 29 22:36:11 2004 +0000 @@ -2143,7 +2143,7 @@ GPT = GPT_BYTE; TEMP_SET_PT_BOTH (PT_BYTE, PT_BYTE); - + for (tail = BUF_MARKERS (current_buffer); tail; tail = tail->next) tail->charpos = tail->bytepos; @@ -3339,7 +3339,7 @@ if (endpos < start) break; - + if (endpos < end || (startpos >= start && startpos < end)) { @@ -3382,7 +3382,7 @@ { startpos = endpos; Fset_marker (OVERLAY_START (overlay), make_number (startpos), - Qnil); + Qnil); } if (startpos >= end) @@ -4193,7 +4193,7 @@ add_overlay_mod_hooklist (prop, overlay); } } - + for (tail = current_buffer->overlays_after; tail; tail = tail->next) { int startpos, endpos; @@ -5866,7 +5866,9 @@ DEFVAR_PER_BUFFER ("line-spacing", ¤t_buffer->extra_line_spacing, Qnil, doc: /* Additional space to put between lines when displaying a buffer. -The space is measured in pixels, and put below lines on window systems. */); +The space is measured in pixels, and put below lines on window systems. +If value is a floating point number, it specifies the spacing relative +to the default frame line height. */); DEFVAR_LISP ("kill-buffer-query-functions", &Vkill_buffer_query_functions, doc: /* List of functions called with no args to query before killing a buffer. */);