X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Ftext-replacements.ly;h=c741f4faf831f3653451320c6ed0fdbbf2dc651b;hb=f509f0d4df0b7d4336d904ca61902ad67dc2be5e;hp=74d414aca86c707afeb6f3b761090290a977acdd;hpb=058370efc7e9710f149d0f444328bb1fcd7bdec1;p=lilypond.git diff --git a/ly/text-replacements.ly b/ly/text-replacements.ly index 74d414aca8..c741f4faf8 100644 --- a/ly/text-replacements.ly +++ b/ly/text-replacements.ly @@ -1,6 +1,6 @@ %%%% This file is part of LilyPond, the GNU music typesetter. %%%% -%%%% Copyright (C) 2011--2014 Bertrand Bordage +%%%% Copyright (C) 2011--2015 Bertrand Bordage %%%% %%%% LilyPond is free software: you can redistribute it and/or modify %%%% it under the terms of the GNU General Public License as published by @@ -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!