add \balloonLength{On,Off} similar to \textLengthOff

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 8bbf124826813f855ef911f8f4fd9c6e81a7b9c6..575d5945d78cf21fb0914bf5fe7afa4b0efe3c73 100644 (file)
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -183,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