X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fquote-transposition.ly;h=fe6a844abcaf3e8a95110801d504fd1cb745517a;hb=63d0ac052683737e60b2268c98d480ad5ab1227c;hp=1b2c55a7300053537de28cad132eaa52e8f723ec;hpb=ecaf73bb03e974018c17e3051b3ac3a805dd1653;p=lilypond.git

diff --git a/input/regression/quote-transposition.ly b/input/regression/quote-transposition.ly
index 1b2c55a730..fe6a844abc 100644
--- a/input/regression/quote-transposition.ly
+++ b/input/regression/quote-transposition.ly
@@ -2,32 +2,44 @@
 \header
 {
 
-    texidoc = "Quotations take into account the transposition of both  source and target.
-In this example, all instruments play sounding central C, the target is a instrument in F."
+    texidoc = "Quotations take into account the transposition of both
+source and target.  In this example, all instruments play sounding
+central C, the target is a instrument in F.  The target part may be
+@code{\\transpose}d.  In this case, all the pitches (including the
+quoted ones) will transposed as well.  "
 
 }
-\version "2.1.28"
 
+\version "2.7.39"
 
-\addquote clarinet \notes {
+\layout { ragged-right = ##t }
+
+
+\addquote clarinet  {
     \transposition bes
     d'16 d'16 d'8 
     d'16 d'16 d'8 
     d'16 d'16 d'8 
     d'16 d'16 d'8 
-    }
-\addquote sax \notes {
+}
+
+\addquote sax  {
     \transposition es'
     a8 a a a a a  a a 
-    }
-
-\score {
-    \notes{
-	\transposition f  % french horn
-	
-	g'4
-	<< \quote clarinet 4 s4^"clar" >> 
-	<< \quote sax 4 s4^"sax" >> 
-    }
 }
 
+quoteTest = {
+    \transposition f  % french horn
+    
+    g'4
+    << \quoteDuring #"clarinet" { \skip 4 } s4^"clar" >> 
+    << \quoteDuring #"sax" { \skip 4 } s4^"sax" >> 
+}
+
+
+<< \quoteTest
+   \new Staff
+   << \transpose c' d' \quoteTest
+     s4_"up 1 tone"
+  >>
+>>