diff options
| author | Lars Ingebrigtsen | 2012-02-20 14:25:28 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2012-02-20 14:25:28 +0000 |
| commit | a212a18a3fa5ca72214361280dcdb1a62b582236 (patch) | |
| tree | 88d6439e0f3d3b659d04d4e63dc38ec0146f7585 | |
| parent | 27e7172ced67cffd830e805d06aca9ad1324f030 (diff) | |
| download | emacs-a212a18a3fa5ca72214361280dcdb1a62b582236.tar.gz emacs-a212a18a3fa5ca72214361280dcdb1a62b582236.zip | |
mm-decode.el (mm-shr): Remove "soft hyphens".
| -rw-r--r-- | lisp/gnus/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/gnus/mm-decode.el | 4 |
2 files changed, 6 insertions, 0 deletions
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 @@ | |||
| 1 | 2012-02-20 Lars Ingebrigtsen <larsi@gnus.org> | 1 | 2012-02-20 Lars Ingebrigtsen <larsi@gnus.org> |
| 2 | 2 | ||
| 3 | * mm-decode.el (mm-shr): Remove "soft hyphens". | ||
| 4 | |||
| 3 | * nnimap.el (nnimap-request-list): Return the group names encoded as | 5 | * nnimap.el (nnimap-request-list): Return the group names encoded as |
| 4 | utf8. Otherwise non-European group names don't work. | 6 | utf8. Otherwise non-European group names don't work. |
| 5 | (nnimap-request-newgroups): Ditto. | 7 | (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." | |||
| 1757 | (string-to-number (match-string 2))) | 1757 | (string-to-number (match-string 2))) |
| 1758 | mm-extra-numeric-entities))) | 1758 | mm-extra-numeric-entities))) |
| 1759 | (replace-match (char-to-string char)))) | 1759 | (replace-match (char-to-string char)))) |
| 1760 | ;; Remove "soft hyphens". | ||
| 1761 | (goto-char (point-min)) | ||
| 1762 | (while (search-forward "" nil t) | ||
| 1763 | (replace-match "" t t)) | ||
| 1760 | (libxml-parse-html-region (point-min) (point-max)))) | 1764 | (libxml-parse-html-region (point-min) (point-max)))) |
| 1761 | (mm-handle-set-undisplayer | 1765 | (mm-handle-set-undisplayer |
| 1762 | handle | 1766 | handle |