X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fproperty-init.ly;h=f7fc11ae7358f6773049f39e729968c690b6ac2d;hb=52851991c3a9c6579893bc4ceb97df574dca49c7;hp=10e301af306ccb3e24efcfc30c4289ec0ab208b9;hpb=169a91c8514e3dcea29d1aa01653a684fb60457d;p=lilypond.git

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 10e301af30..f7fc11ae73 100644
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -123,8 +123,11 @@ endincipit =  \context Staff {
 autoBeamOff = \set autoBeaming = ##f
 autoBeamOn = \set autoBeaming = ##t
 
-fatText = \override TextScript  #'no-spacing-rods = ##f
-emptyText = \override TextScript  #'no-spacing-rods = ##t
+fatText = { \override TextScript  #'extra-spacing-width = #'(0 . 0)
+            \override TextScript  #'infinite-spacing-height = ##t }
+
+emptyText = { \override TextScript  #'extra-spacing-width = #'(+inf.0 . -inf.0)
+              \override TextScript  #'infinite-spacing-height = ##f }
 
 showStaffSwitch = \set followVoice = ##t
 hideStaffSwitch = \set followVoice = ##f