X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Ftext-replacements.ly;h=50f06b484b5a2b9ce7ac33f424db5213c3afed12;hb=8e2eaf4959bec63a1128a444591a540f4f1e2937;hp=36a5f109eee28d1dad633c874ef9809e2fd26498;hpb=d2762a4f1add2bb04d6fc34d3c7ae03eeb7d500f;p=lilypond.git

diff --git a/ly/text-replacements.ly b/ly/text-replacements.ly
index 36a5f109ee..50f06b484b 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!
@@ -91,6 +91,8 @@
        ("&AA;" . "Å")
        ("&ae;" . "æ")
        ("&AE;" . "Æ")
+       ("ä" . "ä")
+       ("Ä" . "Ä")
        ("&dh;" . "ð")
        ("&DH;" . "Ð")
        ("&dj;" . "đ")
@@ -103,10 +105,14 @@
        ("&O;" . "Ø")
        ("&oe;" . "œ")
        ("&OE;" . "Œ")
+       ("ö" . "ö")
+       ("Ö" . "Ö")
        ("&s;" . "Å¿")
        ("&ss;" . "ß")
        ("&th;" . "þ")
        ("&TH;" . "Þ")
+       ("ü" . "ü")
+       ("Ü" . "Ü")
 
        ;; Mathematical symbols
        ("+" . "+")