Increase default space between left edge and key sig (only used if no clef present)

diff --git a/input/regression/key-signature-left-edge.ly b/input/regression/key-signature-left-edge.ly
new file mode 100644 (file)
index 0000000..136b41c
--- /dev/null
+++ b/input/regression/key-signature-left-edge.ly
@@ -0,0 +1,22 @@
+\header {
+
+  texidoc = "If the clef engraver is removed, the key signature shall use a
+proper padding > 0 to the start of the staff lines."
+
+}
+
+\version "2.13.7"
+
+m = \relative c' { \key f \major c8 }
+
+% Default spacing should not be affected
+\new Score  {
+  \new Staff \m
+}
+
+% Key signature should not touch the left edge
+\new Score  {
+  \new Staff \with {
+      \remove "Clef_engraver"
+  } \m
+}

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 16f373e8ba5471e31433d0c6779a2e0a71045e4b..5b54ad835a35815c3db755290c2bd5375b904584 100644 (file)
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -978,7 +978,7 @@
                        (clef . (extra-space . 0.8))
                        (first-note . (fixed-space . 2.0))
                        (right-edge . (extra-space . 0.0))
-                       (key-signature . (extra-space . 0.0))
+                       (key-signature . (extra-space . 0.8))
                        (key-cancellation . (extra-space . 0.0))
                        ))
        (X-extent . (0 . 0))