Fix '' letters in a message view

This commit is contained in:
Dmitry Neverov
2012-12-23 23:55:54 +04:00
parent c36906a254
commit 9db55ac7ab

View File

@ -175,10 +175,10 @@ part, but this can be changed by setting
(with-temp-buffer
(insert body)
(goto-char (point-min))
(while (re-search-forward "[
(while (re-search-forward "[
<EFBFBD><EFBFBD>]" nil t)
(replace-match
(cond
(cond
((string= (match-string 0) "<EFBFBD>") "'")
(t ""))))
(buffer-string))))