X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fquote.ly;h=e884adb3f384956c6aa52c34b886dfc3022c8bd2;hb=77320a48ed671c658f04256d087880c1701eb746;hp=b98d960fc05b5b1d4c3405d758b903178d386f6b;hpb=34881554afeaf03a55a3a983caf9cfeaaf3ea060;p=lilypond.git

diff --git a/input/regression/quote.ly b/input/regression/quote.ly
index b98d960fc0..e884adb3f3 100644
--- a/input/regression/quote.ly
+++ b/input/regression/quote.ly
@@ -3,29 +3,40 @@
 
     texidoc = "With @code{\\quote}, fragments of previously entered
 music may be quoted. @code{quotedEventTypes} will determines what
-things are quoted. In this example, a 16th rests is not quoted, since
+things are quoted. In this example, a 16th rest is not quoted, since
 @code{rest-event} is not in @code{quotedEventTypes}."
 
 }
-\version "2.3.22"
+\version "2.19.21"
 \layout {
-    raggedright = ##t
+    ragged-right = ##t
 }
 
-\addquote bla \relative c' {
-    fis4 r16  a8.-> b-\ff }
 
-\relative c'' {
+quoteMe = \relative { fis'4 r16  a8.-> b4-\ff c }
 
-    \set Staff.quotedEventTypes = #'(note-event articulation-event)
-    c8 d8  <<
-	s2 
-	\new Voice {
-	    \set fontSize = #-2
-	    \quote bla 2
+\addQuote quoteMe \quoteMe 
+original = \relative { c''8 d s2 es8 gis8 }
 
-	} >>
-    es8 gis
-	
+<<
+    \new Staff {
+	\set Staff.instrumentName = "quoteMe"
+	\quoteMe
     }
-
+    \new Staff {
+	\set Staff.instrumentName = "orig"
+	\original
+    }
+    \new Staff \relative c'' <<
+	\set Staff.instrumentName = "orig+quote"	
+	\set Staff.quotedEventTypes = #'(note-event articulation-event)
+	\new Voice {\voiceOne
+	    \original }
+	  \new Voice {\voiceTwo
+	    s4
+	    \set fontSize = #-4
+	    \override Stem.length-fraction = #(magstep -4)
+	    \quoteDuring #"quoteMe" { \skip 2. }
+	}
+    >>
+>>