hans/lilypond-hd
Template
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

clear articulation type

Browse Source
This commit is contained in:
Hans Dijkema
2026-01-19 21:38:12 +01:00
parent 53e40f7122
commit 7ef35839a5
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
functions.ly
View File

@@ -5,6 +5,7 @@ rmtext = #(define-scheme-function
(ly:music?) (ly:music?)
(define (f o) (define (f o)
(ly:music-set-property! o 'text "") (ly:music-set-property! o 'text "")
(ly:music-set-property! o 'articulation-type 'nil-)
(let ((t (ly:music-property o 'name))) (let ((t (ly:music-property o 'name)))
(let ((els (ly:music-property o 'elements))) (let ((els (ly:music-property o 'elements)))
(if (null? els) (if (null? els)