From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 20 Feb 2012 14:25:28 +0000 (+0000)
Subject: mm-decode.el (mm-shr): Remove "soft hyphens".
X-Git-Tag: emacs-pretest-24.0.94~94
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a212a18a3fa5ca72214361280dcdb1a62b582236;p=emacs.git

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

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e2d99e92c9e..c9fd83aaaa0 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/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/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index dd3eb6c9d96..09617384049 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