]> git.donarmstrong.com Git - lilypond.git/commitdiff
Issue 4916: Let \overrideProperty use ApplyOutputEvent.symbol
authorDavid Kastrup <dak@gnu.org>
Sun, 3 Jul 2016 14:06:59 +0000 (16:06 +0200)
committerDavid Kastrup <dak@gnu.org>
Mon, 11 Jul 2016 06:12:11 +0000 (08:12 +0200)
ly/music-functions-init.ly

index a23d154fd814d7e1ebdfe4c2de03afb0ab0659d3..f4f50fafef22fb7248b2612cb6066139fbaaa62c 100644 (file)
@@ -1014,13 +1014,10 @@ creation.")
      (if p
          (make-music 'ApplyOutputEvent
                      'context-type (first p)
+                     'symbol (second p)
                      'procedure
                      (lambda (grob orig-context context)
-                       (if (equal?
-                            (cdr (assoc 'name (ly:grob-property grob 'meta)))
-                            (second p))
-                           (ly:grob-set-nested-property!
-                            grob (cddr p) value))))
+                       (ly:grob-set-nested-property! grob (cddr p) value)))
          (make-music 'Music))))