]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/quote-iterator.cc
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / lily / quote-iterator.cc
index c4336250111170df3e40d0d58085cb645403ef37..885e1bd3b658ef593f0418a19b66449a881a0e77 100644 (file)
@@ -277,8 +277,7 @@ Quote_iterator::process (Moment m)
                   Pitch diff = pitch_interval (mp, qp);
                   ev = ev->clone ();
                   ev->make_transposable ();
-
-                  transpose_mutable (ev->get_property_alist (true), diff);
+                  ev->transpose (diff);
                   transposed_musics_ = scm_cons (ev->unprotect (), transposed_musics_);
                 }
               quote_outlet_.get_context ()->event_source ()->broadcast (ev);