]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/music-functions.scm
* lily/self-aligment-interface.cc (centered_on_parent): only
[lilypond.git] / scm / music-functions.scm
index 59a78254ee2ec994003dd6ff16bc3557aac5025b..cab888da1769c81757d8709a54289c8fe7fab46a 100644 (file)
@@ -53,13 +53,13 @@ written by Rune Zedeler. "
   (let* ((es (ly-get-mus-property music 'elements))
          (e (ly-get-mus-property music 'element))
          (n  (ly-music-name music)))
-
     (if (equal? n "Repeated_music")
         (begin
          (if (equal?
               (ly-get-mus-property music 'iterator-ctor)
               Chord_tremolo_iterator::constructor)
-             (shift-duration-log music (- (intlog2 (ly-get-mus-property 'repeat-count music))))
+             (shift-duration-log music  (intlog2 (ly-get-mus-property music 'repeat-count)))
              )
           (ly-set-mus-property!
            music 'length Repeated_music::unfolded_music_length)