emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r107351: mm-decode.el (mm-shr): Remov


From: Katsumi Yamaoka
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r107351: mm-decode.el (mm-shr): Remove "soft hyphens".
Date: Mon, 20 Feb 2012 14:25:28 +0000
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 107351
author: Lars Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2012-02-20 14:25:28 +0000
message:
  mm-decode.el (mm-shr): Remove "soft hyphens".
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/mm-decode.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-02-20 11:17:07 +0000
+++ b/lisp/gnus/ChangeLog       2012-02-20 14:25:28 +0000
@@ -1,5 +1,7 @@
 2012-02-20  Lars Ingebrigtsen  <address@hidden>
 
+       * 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.

=== modified file 'lisp/gnus/mm-decode.el'
--- a/lisp/gnus/mm-decode.el    2012-01-22 00:54:58 +0000
+++ b/lisp/gnus/mm-decode.el    2012-02-20 14:25:28 +0000
@@ -1757,6 +1757,10 @@
                                    (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


reply via email to

[Prev in Thread] Current Thread [Next in Thread]