# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1083278171 0
# Node ID d57364949309650a528b8ca0811ed57172a5ba60
# Parent  cebca4e25fae910cff840d1fdb76d03007e1832e
(syms_of_buffer) <line-spacing>: Allow float value.

diff -r cebca4e25fae -r d57364949309 src/buffer.c
--- 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",
 		     &current_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.  */);