* mm-decode.el (mm-shr): Remove "soft hyphens".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 79bd696..2bd6712 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-02-20  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * 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/mm-decode.el b/lisp/mm-decode.el
index dd3eb6c..2af621a 100644 (file)
--- a/lisp/mm-decode.el
+++ b/lisp/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