diff options
| author | David Kastrup <dak@gnu.org> | 2014-01-10 14:52:23 +0100 |
|---|---|---|
| committer | David Kastrup <dak@gnu.org> | 2014-01-15 11:11:20 +0100 |
| commit | 98d34812576efba5953bbe1303e1b473d2879203 (patch) | |
| tree | 29f825529542cd55a2ba0fb775b889f005ca4381 /scm | |
| parent | cca4c8878e45b7e46104f60c1ec1544261e8c809 (diff) | |
Simplify tremolo display (issue 3783)
Diffstat (limited to 'scm')
| -rw-r--r-- | scm/define-music-display-methods.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/scm/define-music-display-methods.scm b/scm/define-music-display-methods.scm index 431f9a6e95..c4ed534478 100644 --- a/scm/define-music-display-methods.scm +++ b/scm/define-music-display-methods.scm @@ -167,10 +167,8 @@ expression." (define-display-method TremoloEvent (event parser) - (let ((tremolo-type (ly:music-property event 'tremolo-type))) - (format #f ":~a" (if (= 0 tremolo-type) - "" - tremolo-type)))) + (let ((tremolo-type (ly:music-property event 'tremolo-type 8))) + (format #f ":~a" tremolo-type))) (define-display-method ArticulationEvent (event parser) #t (let* ((articulation (ly:music-property event 'articulation-type)) |