Issue 3481: Let PartialSet use music property 'duration instead of 'partial-duration

[lilypond.git] / scm / define-music-types.scm

diff --git a/scm/define-music-types.scm b/scm/define-music-types.scm
index 5cc5907fbc3606ce0d5182995886a3d109161b6b..0a796a1981b66b7f147e637ad972dfa1dac09a15 100644 (file)
--- a/scm/define-music-types.scm
+++ b/scm/define-music-types.scm
@@ -397,6 +397,11 @@ Syntax: @code{\\override} [ @var{context} @code{.} ]
     (PartialSet
      . ((description . "Create an anacrusis or upbeat (partial measure).")
         (iterator-ctor . ,ly:partial-iterator::constructor)
+        ;; The length-callback is kind of cheesy since 'elements is
+        ;; empty.  We just use that in order to get a zero length
+        ;; for the overall timing in spite of having a non-zero
+        ;; duration field.
+        (length-callback . ,ly:music-sequence::cumulative-length-callback)
         (types . (general-music partial-set))
         ))