diff options
| author | David Kastrup <dak@gnu.org> | 2016-07-03 16:06:59 +0200 |
|---|---|---|
| committer | David Kastrup <dak@gnu.org> | 2016-07-11 08:12:11 +0200 |
| commit | 9a7a86622af9ce0a8f36e0a6c1e08d8a54dd8e3c (patch) | |
| tree | 78fa9230888b6e0eee237ab9803d016c33687ad0 | |
| parent | e7121831390ef4b0d09c1d509e1ccb0de2ea36a8 (diff) | |
Issue 4916: Let \overrideProperty use ApplyOutputEvent.symbol
| -rw-r--r-- | ly/music-functions-init.ly | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly index a23d154fd8..f4f50fafef 100644 --- a/ly/music-functions-init.ly +++ b/ly/music-functions-init.ly @@ -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)))) |