X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fballoon.ly;h=5cd81d09d9c51aa327fd01ff5bb32e6013ad622f;hb=ce5cfa4a4b6e94655d12e3f1a1719bde789d2127;hp=75c9fef984ca8237c506ada774be5d7e119cb0e4;hpb=5956be580d291c1460f1c4b5f6e4a1c3e6549602;p=lilypond.git

diff --git a/input/regression/balloon.ly b/input/regression/balloon.ly
index 75c9fef984..5cd81d09d9 100644
--- a/input/regression/balloon.ly
+++ b/input/regression/balloon.ly
@@ -1,32 +1,18 @@
 
 \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.16"
-
-\score  {
-  {
-     
-   \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))
-
+  
+}
+\version "2.10.0"
 
-       %% use predefd function. 
-       \context Voice \applyoutput #(add-balloon-text
-				     'NoteHead "heads, or tails?"
-				     '(0 . -3))
+\layout{ ragged-right = ##t }
 
-      
-       c8
-       }
+\new Voice \with {\consists "Balloon_engraver" }
+{
+  \relative c'  {
+    \balloonGrobText #'Stem #'(3 . 4) \markup { "I'm a Stem" }
+    <c-\balloonText #'(-2 . -2) \markup { \simple #"hoi" }  >8
   }
- \paper{ raggedright = ##t }
 }