Add hack in makelsr to strip '% LSR' comments

[lilypond.git] / ly / property-init.ly

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 54bb6681bf588d992dc0c5faf19487f46f9a1fb6..575d5945d78cf21fb0914bf5fe7afa4b0efe3c73 100644 (file)
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -138,7 +138,10 @@ voiceNeutralStyle = {
   \revert Beam #'color
 }
 
-       
+teeny = {
+  \set fontSize = #-3
+}
+
 tiny = {
   \set fontSize = #-2
 }
@@ -180,6 +183,17 @@ textLengthOff = {
   \override TextScript  #'infinite-spacing-height = ##f
 }
 
+balloonLengthOn = {
+  \override BalloonTextItem #'extra-spacing-width = #'(0 . 0)
+  \override BalloonTextItem #'infinite-spacing-height = ##t
+}
+
+balloonLengthOff = {
+  \override BalloonTextItem #'extra-spacing-width = #'(+inf.0 . -inf.0)
+  \override BalloonTextItem #'infinite-spacing-height = ##f
+}
+
+
 showStaffSwitch = \set followVoice = ##t
 hideStaffSwitch = \set followVoice = ##f
 
@@ -191,6 +205,14 @@ compressFullBarRests = {
   \set Score.skipBars = ##t
 }
 
+numericTimeSignature = {
+  \override Staff.TimeSignature #'style = #'()
+}
+
+defaultTimeSignature = {
+  \revert Staff.TimeSignature #'style
+}
+
 
 % For drawing vertical chord brackets with \arpeggio
 % This is a shorthand for the value of the print-function property