* lily/tuplet-bracket.cc (brew_molecule): call after_line_breaking

[lilypond.git] / input / test / improv.ly

diff --git a/input/test/improv.ly b/input/test/improv.ly
index ff350187ec6995bba63c0d8921240376178fb8b6..4304dbabeb1d6b77d806147c17113a7c52d7ad66 100644 (file)
--- a/input/test/improv.ly
+++ b/input/test/improv.ly
@@ -1,46 +1,56 @@
+\version "2.1.7"
+\header {
 
-improOn = \notes {\translator Voice = impro }
-improOff = \notes {\translator SquashVoice = melo }
+texidoc =
 
-global = \notes { s1*3 \bar "|."; }
+
+"@cindex improvisation
+
+
+Noteheads for improvisation have a different shape.
+
+
+" }
+
+
+improOn = \notes {\change Voice = impro }
+improOff = \notes {\change SquashVoice = melo }
+
+global = \notes { s1*3 \bar "|." }
 
 \score {
-  <
-    \context ChordNames \chords {e8:m7*7 a2.:m7 bes4:m7 b1:m7 e8:m }
-    \context Staff \notes <
+  <<
+    \context ChordNames \chords {e8*7:m7 a2.:m7 bes4:m7 b1:m7 e8:m }
+    \context Staff \notes <<
       \context SquashVoice = impro { \global }
-      \context Voice = melo \transpose c'' {
-       e8 e g a a16()bes()a8 g \improOn e8
+      \context Voice = melo \transpose c c' {
+       e8 e g a a16(bes)(a8) g \improOn e8
        ~e2~e8 f4 fis8
-       ~fis2 \improOff a16()bes a8 g e
+       ~fis2 \improOff a16(bes) a8 g e
       }
-    >
-  >
+    >>
+  >>
   \paper { 
     \translator {
       \VoiceContext
-      \name SquashVoice;
-      \alias Voice;
-      \consists Pitch_squash_engraver;
-      \consists Local_key_engraver;
-      squashedPosition = 6;
+      \name SquashVoice
+      \alias Voice
+      \consists Pitch_squash_engraver
+      squashedPosition = #0
       NoteHead \override #'style = #'slash
-      Accidentals \override #'transparent = ##t
     }
+
     \translator {
       \VoiceContext
-      \alias SquashVoice;
-      \consists Local_key_engraver;
-    }
-    \translator {
-      \ScoreContext
-      \accepts SquashVoice;
+      \alias SquashVoice
     }
+    
     \translator {
       \StaffContext
-      \remove Local_key_engraver;
-      \accepts SquashVoice;
+      \remove "Accidental_engraver"
+      \accepts SquashVoice
     }
-    linewidth = -1;
+    raggedright = ##t
   }
 }
+