X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fballoon.ly;h=1d0c9a75889605de3919249e9cc28c3fdc76ffa3;hb=b98d183aed598bcfe1d79827a724e60025f62ee2;hp=4c16136215a17ee0085309cd0303ecce509aecd4;hpb=51159f8679de00e6cd526ca2a16e1ea4d4294f81;p=lilypond.git

diff --git a/input/regression/balloon.ly b/input/regression/balloon.ly
index 4c16136215..1d0c9a7588 100644
--- a/input/regression/balloon.ly
+++ b/input/regression/balloon.ly
@@ -1,32 +1,31 @@
 
 \header {
-    texidoc = "With balloon texts, objects in the output can be marked,
+  texidoc = "With balloon texts, objects in the output can be marked,
 with lines and explanatory text added."
-    }
-\version "2.3.4"
+}
+\version "2.7.39"
+
+\layout{ ragged-right = ##t }
 
-\score  {
-  {
-     
-   \relative c'  {
+{
+  
+  \relative c'  {
 
-       %% by hand:
-       \once\override Stem  #'print-function = #Balloon_interface::print
-       \once\override Stem  #'balloon-original-callback = #Stem::print
-       \once\override Stem  #'balloon-text = #"I'm a stem"
-       \once\override Stem  #'balloon-text-offset = #'(3 . 4)
-       \once\override Stem  #'balloon-text-props
-      = #'((font-family .  roman))
+    %% by hand:
+    \once\override Stem #'stencil = #ly:balloon-interface::print
+    \once\override Stem #'original-stencil = #ly:stem::print
+    \once\override Stem #'balloon-text = #"I'm a stem"
+    \once\override Stem #'balloon-text-offset = #'(3 . 4)
+    \once\override Stem #'balloon-text-props
+    = #'((font-family .  roman))
 
 
-       %% use predefd function. 
-       \context Voice \applyoutput #(add-balloon-text
-				     'NoteHead "heads, or tails?"
-				     '(0 . -3))
+    %% use predefd function. 
+    \context Voice \applyOutput #(add-balloon-text
+				  'NoteHead "heads, or tails?"
+				  '(0 . -3))
 
-      
-       c8
-       }
+    
+    c8
   }
- \paper{ raggedright = ##t }
 }