X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=input%2Fregression%2Fballoon.ly;h=3ba915b3cad39f1665fe10aaca695dd5bae43644;hb=32a34dcef0c0041c6d62677487a380b5c8b85712;hp=c7f78c45cd34702c948948fbe333f99bba086e5d;hpb=5d4dac8980f796c7e4c97f1a4f19822c0fc4fff7;p=lilypond.git

diff --git a/input/regression/balloon.ly b/input/regression/balloon.ly
index c7f78c45cd..3ba915b3ca 100644
--- a/input/regression/balloon.ly
+++ b/input/regression/balloon.ly
@@ -1,31 +1,27 @@
 
 \header {
+  
   texidoc = "With balloon texts, objects in the output can be marked,
 with lines and explanatory text added."
-}
-\version "2.7.13"
-
-\layout{ raggedright = ##t }
-
-{
   
-  \relative c'  {
-
-    %% by hand:
-    \once\override Stem #'stencil = #Balloon_interface::print
-    \once\override Stem #'original-stencil = #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.16.0"
 
+\layout{ ragged-right = ##t }
 
-    %% use predefd function. 
-    \context Voice \applyOutput #(add-balloon-text
-				  'NoteHead "heads, or tails?"
-				  '(0 . -3))
+\score{
+  \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
+    }
+  }
 
-    
-    c8
+  \layout {
+    \context {
+      \Score
+      \override PaperColumn #'keep-inside-line = ##f
+    }
   }
 }