Change space to basic-distance in spacing alists.

14 files changed, 54 insertions, 47 deletions

diff --git a/input/regression/page-breaking-min-distance2.ly b/input/regression/page-breaking-min-distance2.ly
index 4634fbe2b8..57f9d59230 100644
--- a/input/regression/page-breaking-min-distance2.ly
+++ b/input/regression/page-breaking-min-distance2.ly
@@ -1,4 +1,4 @@
-\version "2.13.39"
+\version "2.13.42"
 
 \header {
   texidoc = "minimum-distance within a system is correctly accounted for in page breaking."
@@ -8,7 +8,7 @@
   \context {
     \Score
     \override VerticalAxisGroup #'staff-staff-spacing =
-      #'((space . 20)
+      #'((basic-distance . 20)
          (stretchability . 0))
   }
 }
diff --git a/input/regression/page-spacing-nonstaff-lines-between.ly b/input/regression/page-spacing-nonstaff-lines-between.ly
index a8de135cd7..a8570796b8 100644
--- a/input/regression/page-spacing-nonstaff-lines-between.ly
+++ b/input/regression/page-spacing-nonstaff-lines-between.ly
@@ -1,4 +1,4 @@
-\version "2.13.36"
+\version "2.13.42"
 
 \header {
   texidoc = "Non-staff lines between two systems don't confuse the
@@ -9,7 +9,7 @@ between the two closest staves of consecutive systems."
 
 \paper {
   ragged-right = ##t
-  system-system-spacing = #'((space . 20) (minimum-distance . 30))
+  system-system-spacing = #'((basic-distance . 20) (minimum-distance . 30))
   annotate-spacing = ##t
 }
 
diff --git a/input/regression/page-spacing-nonstaff-lines-bottom.ly b/input/regression/page-spacing-nonstaff-lines-bottom.ly
index ec15e48940..b99304a0ad 100644
--- a/input/regression/page-spacing-nonstaff-lines-bottom.ly
+++ b/input/regression/page-spacing-nonstaff-lines-bottom.ly
@@ -1,4 +1,4 @@
-\version "2.13.39"
+\version "2.13.42"
 
 \header {
   texidoc = "A non-staff line (such as @code{Lyrics}) at the
@@ -9,7 +9,7 @@ bottom of a system gets spaced appropriately."
   ragged-right = ##t
   \context {
     \Lyrics
-    \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'space = #20
+    \override VerticalAxisGroup #'nonstaff-nonstaff-spacing #'basic-distance = #20
   }
 }
 <<
diff --git a/input/regression/page-spacing-nonstaff-lines-header-padding.ly b/input/regression/page-spacing-nonstaff-lines-header-padding.ly
index e83b24605c..924723de69 100644
--- a/input/regression/page-spacing-nonstaff-lines-header-padding.ly
+++ b/input/regression/page-spacing-nonstaff-lines-header-padding.ly
@@ -1,4 +1,4 @@
-\version "2.13.36"
+\version "2.13.42"
 
 \header {
   texidoc = "Padding from the header and footer is measured to the
@@ -9,8 +9,8 @@ first non-staff line, whether or not it is spaceable."
 
 \book {
   \paper {
-    top-system-spacing = #'((space . 1) (padding . 10))
-    last-bottom-spacing = #'((space . 1) (padding . 10))
+    top-system-spacing = #'((basic-distance . 1) (padding . 10))
+    last-bottom-spacing = #'((basic-distance . 1) (padding . 10))
     annotate-spacing = ##t
     ragged-last-bottom = ##f
   }
diff --git a/input/regression/page-spacing-staff-group-hara-kiri.ly b/input/regression/page-spacing-staff-group-hara-kiri.ly
index 940e3ace8c..18ae6d93fc 100644
--- a/input/regression/page-spacing-staff-group-hara-kiri.ly
+++ b/input/regression/page-spacing-staff-group-hara-kiri.ly
@@ -1,4 +1,4 @@
-\version "2.13.39"
+\version "2.13.42"
 
 \header {
   texidoc = "StaffGrouper interacts correctly with \RemoveEmptyStaffContext.
@@ -18,7 +18,7 @@ In both systems, there should be a large space between the staff groups."
 \score {
   <<
     \new StaffGroup = "G1" \with {
-      \override StaffGrouper #'staffgroup-staff-spacing #'space = #20
+      \override StaffGrouper #'staffgroup-staff-spacing #'basic-distance = #20
     }
     <<
       \new Staff { c'1 \break c'1 \break R1 }
diff --git a/input/regression/paper-nested-override2.ly b/input/regression/paper-nested-override2.ly
index 632c48411d..49c6a7f7b0 100644
--- a/input/regression/paper-nested-override2.ly
+++ b/input/regression/paper-nested-override2.ly
@@ -1,4 +1,4 @@
-\version "2.13.38"
+\version "2.13.42"
 
 \header {
   texidoc = "Setting individual nested paper properties does not
@@ -8,7 +8,7 @@ remove existing settings or break spacing annotation."
 \book {
   \paper {
     annotate-spacing = ##t
-    system-system-spacing = #'((space . 12) (minimum-distance . 8))
+    system-system-spacing = #'((basic-distance . 12) (minimum-distance . 8))
     system-system-spacing #'padding = #1
   }
   \relative c' {
diff --git a/input/regression/system-overstrike.ly b/input/regression/system-overstrike.ly
index 1a304b3156..09b87b0838 100644
--- a/input/regression/system-overstrike.ly
+++ b/input/regression/system-overstrike.ly
@@ -1,4 +1,4 @@
-\version "2.13.36"
+\version "2.13.42"
 
 \header {
   texidoc = "By setting the padding between systems to a negative
@@ -9,7 +9,7 @@ value, it is possible to eliminate the anti-collision constraints.
 \book {
   \paper {
     ragged-bottom = ##t
-    system-system-spacing = #'((space . 1) (padding . -10))
+    system-system-spacing = #'((basic-distance . 1) (padding . -10))
   }
 
   {
diff --git a/lily/constrained-breaking.cc b/lily/constrained-breaking.cc
index dcef2208e3..29c00e1b03 100644
--- a/lily/constrained-breaking.cc
+++ b/lily/constrained-breaking.cc
@@ -398,13 +398,13 @@ Constrained_breaking::initialize ()
 
   Page_layout_problem::read_spacing_spec (spacing_spec,
 					  &system_system_space_,
-					  ly_symbol2scm ("space"));
+					  ly_symbol2scm ("basic-distance"));
   Page_layout_problem::read_spacing_spec (page_breaking_spacing_spec,
 					  &system_system_space_,
-					  ly_symbol2scm ("space"));
+					  ly_symbol2scm ("basic-distance"));
   Page_layout_problem::read_spacing_spec (title_spec,
 					  &system_markup_space_,
-					  ly_symbol2scm ("space"));
+					  ly_symbol2scm ("basic-distance"));
 
   Page_layout_problem::read_spacing_spec (spacing_spec,
 					  &system_system_padding_,
@@ -543,8 +543,8 @@ Line_details::Line_details (Prob *pb, Output_def *paper)
   title_min_distance_ = 0;
   space_ = 0;
   title_space_ = 0;
-  Page_layout_problem::read_spacing_spec (spec, &space_, ly_symbol2scm ("space"));
-  Page_layout_problem::read_spacing_spec (title_spec, &title_space_, ly_symbol2scm ("space"));
+  Page_layout_problem::read_spacing_spec (spec, &space_, ly_symbol2scm ("basic-distance"));
+  Page_layout_problem::read_spacing_spec (title_spec, &title_space_, ly_symbol2scm ("basic-distance"));
   Page_layout_problem::read_spacing_spec (spec, &padding_, ly_symbol2scm ("padding"));
   Page_layout_problem::read_spacing_spec (title_spec, &title_padding_, ly_symbol2scm ("padding"));
   Page_layout_problem::read_spacing_spec (spec, &min_distance_, ly_symbol2scm ("minimum-distance"));
diff --git a/lily/page-layout-problem.cc b/lily/page-layout-problem.cc
index aec0b80ac8..e9a00093d9 100644
--- a/lily/page-layout-problem.cc
+++ b/lily/page-layout-problem.cc
@@ -652,7 +652,7 @@ Page_layout_problem::get_fixed_spacing (Grob *before, Grob *after, int spaceable
   Real stretchability = 0;
   if (Page_layout_problem::read_spacing_spec (spec, &stretchability, ly_symbol2scm ("stretchability"))
       && stretchability == 0)
-    Page_layout_problem::read_spacing_spec (spec, &ret, ly_symbol2scm ("space"));
+    Page_layout_problem::read_spacing_spec (spec, &ret, ly_symbol2scm ("basic-distance"));
 
   // If we're pure, then paper-columns have not had their systems set,
   // and so elts[i]->get_system () is unreliable.
@@ -752,7 +752,7 @@ Page_layout_problem::alter_spring_from_spacing_spec (SCM spec, Spring* spring)
   Real space;
   Real stretch;
   Real min_dist;
-  if (read_spacing_spec (spec, &space, ly_symbol2scm ("space")))
+  if (read_spacing_spec (spec, &space, ly_symbol2scm ("basic-distance")))
     spring->set_distance (space);
   if (read_spacing_spec (spec, &min_dist, ly_symbol2scm ("minimum-distance")))
     spring->set_min_distance (min_dist);
diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index 26f0de3706..d102d7c5d4 100644
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -16,7 +16,7 @@
 %%%% You should have received a copy of the GNU General Public License
 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 
-\version "2.13.39"
+\version "2.13.42"
 
 \context {
   \name "Global"
@@ -375,7 +375,7 @@ a collection of staves, with a bracket in front and spanning bar lines."
   pedalUnaCordaStrings = #'("una corda" "" "tre corde")
   \override VerticalAxisGroup #'staff-affinity = #CENTER
   \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
-    #'((space . 5)
+    #'((basic-distance . 5)
        (padding . 0.5))
   \override TextScript #'font-shape = #'italic
   \override DynamicLineSpanner #'Y-offset = #0
@@ -407,14 +407,14 @@ printing of a single line of lyrics."
   \override VerticalAxisGroup #'remove-empty = ##t
   \override VerticalAxisGroup #'staff-affinity = #UP
   \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing =
-    #'((space . 5.5)
-       (stretchability . 1)
-       (padding . 0.5))
+    #'((basic-distance . 5.5)
+       (padding . 0.5)
+       (stretchability . 1))
   \override VerticalAxisGroup #'nonstaff-nonstaff-spacing =
-     #'((space . 0)
-	(stretchability . 0)
+     #'((basic-distance . 0)
+	(minimum-distance . 2.8)
 	(padding . 0.2)
-	(minimum-distance . 2.8))
+	(stretchability . 0))
   \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing #'padding = #1.5
   \override InstrumentName #'self-alignment-Y = ##f
 
diff --git a/ly/paper-defaults-init.ly b/ly/paper-defaults-init.ly
index e18e12019d..e3ff4ee04d 100644
--- a/ly/paper-defaults-init.ly
+++ b/ly/paper-defaults-init.ly
@@ -17,7 +17,7 @@
 %%%% You should have received a copy of the GNU General Public License
 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 
-\version "2.12.0"
+\version "2.13.42"
 
 \paper {
   #(set-paper-dimension-variables (current-module))
@@ -61,14 +61,14 @@
   %% Flexible vertical spacing
   %%
   %% Note: these are not scaled; they are in staff-spaces.
-  system-system-spacing = #'((space . 12) (minimum-distance . 8) (padding . 1) (stretchability . 60))
-  score-system-spacing = #'((space . 14) (minimum-distance . 8) (padding . 1) (stretchability . 120))
-  markup-system-spacing = #'((space . 5) (padding . 0.5) (stretchability . 30))
-  score-markup-spacing = #'((space . 12) (padding . 0.5) (stretchability . 60))
-  markup-markup-spacing = #'((space . 1) (padding . 0.5))
-  top-system-spacing = #'((space . 1) (padding . 1) (minimum-distance . 0))
-  top-markup-spacing = #'((space . 0) (padding . 1) (minimum-distance . 0))
-  last-bottom-spacing = #'((space . 1) (padding . 1) (minimum-distance . 0) (stretchability . 30))
+  system-system-spacing = #'((basic-distance . 12) (minimum-distance . 8) (padding . 1) (stretchability . 60))
+  score-system-spacing = #'((basic-distance . 14) (minimum-distance . 8) (padding . 1) (stretchability . 120))
+  markup-system-spacing = #'((basic-distance . 5) (padding . 0.5) (stretchability . 30))
+  score-markup-spacing = #'((basic-distance . 12) (padding . 0.5) (stretchability . 60))
+  markup-markup-spacing = #'((basic-distance . 1) (padding . 0.5))
+  top-system-spacing = #'((basic-distance . 1) (padding . 1) (minimum-distance . 0))
+  top-markup-spacing = #'((basic-distance . 0) (padding . 1) (minimum-distance . 0))
+  last-bottom-spacing = #'((basic-distance . 1) (padding . 1) (minimum-distance . 0) (stretchability . 30))
 
 
   %%
diff --git a/python/convertrules.py b/python/convertrules.py
index 3ea4739db0..b01e1bbaba 100644
--- a/python/convertrules.py
+++ b/python/convertrules.py
@@ -3108,6 +3108,13 @@ def conv(str):
 
     return str
 
+@rule ((2, 13, 42),
+    _ ("Rename space to basic-distance in various spacing alists."))
+def conv(str):
+    str = re.sub (r'\(space\s+\.\s+([0-9]*\.?[0-9]*)\)', r'(basic-distance . \1)', str)
+    str = re.sub (r"#'space\s+=\s+#?([0-9]*\.?[0-9]*)", r"#'basic-distance = #\1", str)
+    return str
+
 
 # Guidelines to write rules (please keep this at the end of this file)
 #
diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index 6097eb8f07..497f8f08af 100644
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -785,7 +785,7 @@ appear between staves.  The alist can contain the following keys:
 @item @code{padding} -- the minimum required amount of
 unobstructed vertical whitespace between the two items, measured
 in staff-spaces.
-@item @code{space} -- the vertical distance, measured in
+@item @code{basic-distance} -- the vertical distance, measured in
 staff-spaces, between the reference points of the two items when
 no collisions would result, and no stretching or compressing is in
 effect.
diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 9666d63030..0f66726b47 100644
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -1681,14 +1681,14 @@
 
     (StaffGrouper
      . (
-	(staff-staff-spacing . ((space . 9)
-                                (stretchability . 5)
+	(staff-staff-spacing . ((basic-distance . 9)
 				(minimum-distance . 7)
-				(padding . 1)))
-	(staffgroup-staff-spacing . ((space . 10.5)
-                                     (stretchability . 9)
+				(padding . 1)
+                                (stretchability . 5)))
+	(staffgroup-staff-spacing . ((basic-distance . 10.5)
 				     (minimum-distance . 8)
-				     (padding . 1)))
+				     (padding . 1)
+                                     (stretchability . 9)))
 	(meta . ((class . Spanner)
 		 (interfaces . (staff-grouper-interface))))))
 
@@ -2268,7 +2268,7 @@
      . (
 	(adjacent-pure-heights . ,ly:axis-group-interface::adjacent-pure-heights)
 	(axes . (,Y))
-	(default-staff-staff-spacing . ((space . 9)
+	(default-staff-staff-spacing . ((basic-distance . 9)
 					(minimum-distance . 8)
 					(padding . 1)))
 	(nonstaff-unrelatedstaff-spacing . ((padding . 0.5)))