My goal is to replace all literal sub-strings in a given string.
(defun translate (str) (concat (mapcar (lambda(cons) (replace-in-string (car cons) (cdr cons) str)) '(("ä" "ae") ("ö" "oe") ("ü" "ue") ("ß" "ss"))))) ) (defun replace-in-string (what with in) (replace-regexp-in-string (regexp-quote what) with in nil 'literal))
translate should replace all ä's by ae's etc. but it doesn't. Can you please tell me what is wrong?
See this discussion for