From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Fri, 6 Nov 2009 13:06:42 +0000 (+0100)
Subject: Increase default space between left edge and key sig (only used if no clef present)
X-Git-Tag: release/2.13.8-1~69
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a7075d1b868f2060b7df29dd2b53587f797e9d10;p=lilypond.git

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
index 0000000000..136b41c70a
--- /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 16f373e8ba..5b54ad835a 100644
--- 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))