diff --git a/shiny/app.R b/shiny/app.R
index 9255ec0..94541f9 100644
--- a/shiny/app.R
+++ b/shiny/app.R
@@ -165,7 +165,7 @@
 
     highchart() %>%
       hc_add_series(type = "bar", data = df, hcaes(domain, tokens, group=corpus)) %>%
-      hc_xAxis(categories = df$domain %>% str_to_title(locale = "en") )%>%
+      hc_xAxis(categories = df$domain %>% tools::toTitleCase() %>% str_replace_all("ae", "ä") )%>%
       hc_title(text="Thema")
 
   })