X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Ftext-replacements.ly;h=c741f4faf831f3653451320c6ed0fdbbf2dc651b;hb=bcd127bc07fc7b53704f9db8a6cf3d53e9d4094a;hp=36a5f109eee28d1dad633c874ef9809e2fd26498;hpb=c054eb280fd9953596eb164f67b0f9d5555c5a32;p=lilypond.git diff --git a/ly/text-replacements.ly b/ly/text-replacements.ly index 36a5f109ee..c741f4faf8 100644 --- a/ly/text-replacements.ly +++ b/ly/text-replacements.ly @@ -19,9 +19,9 @@ #(define (add-text-replacements! alist) (set! text-font-defaults - (assoc-set! text-font-defaults 'replacement-alist - (cdaar - (internal-add-text-replacements (list text-font-defaults) alist))))) + (assoc-set! text-font-defaults 'replacement-alist + (cdaar + (internal-add-text-replacements (list text-font-defaults) alist))))) #(define (include-special-characters) (add-text-replacements!