X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fcary-layout.ly;h=3bfde1d7b73a68cada473eb7671130c4e922aad8;hb=800f39d7cbef036d72a6683f810beaa55ee10990;hp=c0ec727c2c8c2e7f6b9ca0daee9f32e6f791e246;hpb=0ce1d0a59db641b5aa8315c5b696bd23d5676bc5;p=lilypond.git diff --git a/input/cary-layout.ly b/input/cary-layout.ly index c0ec727c2c..3bfde1d7b7 100644 --- a/input/cary-layout.ly +++ b/input/cary-layout.ly @@ -76,28 +76,28 @@ fraction = #(define-music-function (parser location music) (ly:music?) #{ \tweak #'text #tuplet-number::calc-fraction-text $music #}) triangle = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(do do do do do do do) $music #}) + #{ \once \set shapeNoteStyles = #'#(do do do do do do do) $music #}) semicircle = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(re re re re re re re) $music #}) + #{ \once \set shapeNoteStyles = #'#(re re re re re re re) $music #}) blackdiamond = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(mi mi mi mi mi mi mi) $music #}) + #{ \once \set shapeNoteStyles = #'#(mi mi mi mi mi mi mi) $music #}) tiltedtriangle = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(fa fa fa fa fa fa fa) $music #}) + #{ \once \set shapeNoteStyles = #'#(fa fa fa fa fa fa fa) $music #}) square = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(la la la la la la la) $music #}) + #{ \once \set shapeNoteStyles = #'#(la la la la la la la) $music #}) wedge = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(ti ti ti ti ti ti ti) $music #}) + #{ \once \set shapeNoteStyles = #'#(ti ti ti ti ti ti ti) $music #}) harmonic = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) $music #}) + #{ \once \set shapeNoteStyles = #'#(harmonic harmonic harmonic harmonic harmonic harmonic harmonic) $music #}) cross = #(define-music-function (parser location music) (ly:music?) - #{ \once \set shapeNoteStyles = ##(cross cross cross cross cross cross cross) $music #}) + #{ \once \set shapeNoteStyles = #'#(cross cross cross cross cross cross cross) $music #}) white = #(define-music-function (parser location music) (ly:music?) #{ \once \override NoteHead #'duration-log = #1 $music #})