%%%% This file is part of LilyPond, the GNU music typesetter.
%%%%
-%%%% Copyright (C) 2011--2014 Bertrand Bordage <bordage.bertrand@gmail.com>
+%%%% Copyright (C) 2011--2015 Bertrand Bordage <bordage.bertrand@gmail.com>
%%%%
%%%% LilyPond is free software: you can redistribute it and/or modify
%%%% it under the terms of the GNU General Public License as published by
#(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!
("&AA;" . "Å")
("&ae;" . "æ")
("&AE;" . "Æ")
+ ("ä" . "ä")
+ ("Ä" . "Ä")
("&dh;" . "ð")
("&DH;" . "Ð")
("&dj;" . "đ")
("&O;" . "Ø")
("&oe;" . "œ")
("&OE;" . "Œ")
+ ("ö" . "ö")
+ ("Ö" . "Ö")
("&s;" . "ſ")
("&ss;" . "ß")
("&th;" . "þ")
("&TH;" . "Þ")
+ ("ü" . "ü")
+ ("Ü" . "Ü")
;; Mathematical symbols
("+" . "+")