]> git.donarmstrong.com Git - lilypond.git/commitdiff
Issue 630 et al. Change confusion between property overrides and sets.
authorDavid Kastrup <dak@gnu.org>
Mon, 6 Feb 2012 18:20:02 +0000 (19:20 +0100)
committerDavid Kastrup <dak@gnu.org>
Mon, 13 Feb 2012 13:28:12 +0000 (14:28 +0100)
scm/music-functions.scm

index 1666084735b997db40fb812d1f4d26a76712775b..8e9a7658de0c0ff4007f1cd16a692842bae6b473 100644 (file)
@@ -426,8 +426,8 @@ in @var{grob}."
 (define-safe-public (make-voice-props-set n)
   (make-sequential-music
    (append
-    (map (lambda (x) (make-grob-property-set x 'direction
-                                            (if (odd? n) -1 1)))
+    (map (lambda (x) (make-grob-property-override x 'direction
+                                                 (if (odd? n) -1 1)))
         direction-polyphonic-grobs)
     (list
      (make-property-set 'graceSettings
@@ -447,8 +447,8 @@ in @var{grob}."
                          (Voice Fingering font-size -8)
                          (Voice StringNumber font-size -8)))
 
-     (make-grob-property-set 'NoteColumn 'horizontal-shift (quotient n 2))
-     (make-grob-property-set 'MultiMeasureRest 'staff-position (if (odd? n) -4 4))))))
+     (make-grob-property-override 'NoteColumn 'horizontal-shift (quotient n 2))
+     (make-grob-property-override 'MultiMeasureRest 'staff-position (if (odd? n) -4 4))))))
 
 (define-safe-public (make-voice-props-revert)
   (make-sequential-music