aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <[email protected]>2012-02-20 14:25:28 +0000
committerKatsumi Yamaoka <[email protected]>2012-02-20 14:25:28 +0000
commita212a18a3fa5ca72214361280dcdb1a62b582236 (patch)
tree88d6439e0f3d3b659d04d4e63dc38ec0146f7585 /lisp
parent27e7172ced67cffd830e805d06aca9ad1324f030 (diff)
mm-decode.el (mm-shr): Remove "soft hyphens".
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog2
-rw-r--r--lisp/gnus/mm-decode.el4
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e2d99e92c9..c9fd83aaaa 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,7 @@
2012-02-20 Lars Ingebrigtsen <[email protected]>
+ * mm-decode.el (mm-shr): Remove "soft hyphens".
+
* nnimap.el (nnimap-request-list): Return the group names encoded as
utf8. Otherwise non-European group names don't work.
(nnimap-request-newgroups): Ditto.
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index dd3eb6c9d9..0961738404 100644
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -1757,6 +1757,10 @@ If RECURSIVE, search recursively."
(string-to-number (match-string 2)))
mm-extra-numeric-entities)))
(replace-match (char-to-string char))))
+ ;; Remove "soft hyphens".
+ (goto-char (point-min))
+ (while (search-forward "�" nil t)
+ (replace-match "" t t))
(libxml-parse-html-region (point-min) (point-max))))
(mm-handle-set-undisplayer
handle