fixes ampersand escaping (EJAB-1258)

This commit is contained in:
Evgeniy Khramtsov 2010-08-19 16:28:31 +10:00
parent d6722e353f
commit 445691bab1
1 changed files with 2 additions and 2 deletions

View File

@ -170,7 +170,7 @@ do_sub(S, {RegExp, New, Times}, Iter) ->
end.
replace_amps(String) ->
lists:map(
lists:flatmap(
fun($&) -> "\\&";
(Chr) -> Chr
(Chr) -> [Chr]
end, String).