X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Ftext-replacements.ly;h=50f06b484b5a2b9ce7ac33f424db5213c3afed12;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=565bcba3d9d2192b36fc943d850325aff6bc418f;hpb=08560a1b8076630c4fc6cb9b902614d8b74fd6fc;p=lilypond.git diff --git a/ly/text-replacements.ly b/ly/text-replacements.ly index 565bcba3d9..50f06b484b 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--2012 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 @@ -15,13 +15,13 @@ %%%% You should have received a copy of the GNU General Public License %%%% along with LilyPond. If not, see . -\version "2.15.13" +\version "2.16.0" #(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! @@ -91,6 +91,8 @@ ("&AA;" . "Å") ("&ae;" . "æ") ("&AE;" . "Æ") + ("ä" . "ä") + ("Ä" . "Ä") ("&dh;" . "ð") ("&DH;" . "Ð") ("&dj;" . "đ") @@ -103,10 +105,14 @@ ("&O;" . "Ø") ("&oe;" . "œ") ("&OE;" . "Œ") + ("ö" . "ö") + ("Ö" . "Ö") ("&s;" . "Å¿") ("&ss;" . "ß") ("&th;" . "þ") ("&TH;" . "Þ") + ("ü" . "ü") + ("Ü" . "Ü") ;; Mathematical symbols ("+" . "+")