aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiles Bader2004-12-29 16:01:49 +0000
committerMiles Bader2004-12-29 16:01:49 +0000
commit2f7717f601c768019ee2a73a7f3535c5de74512b (patch)
treed2a1638b933c30b2598ffb94e2685917a34055a3
parentf4b483aa362dcb2b1ebc821eec258022bc4d6fa3 (diff)
downloademacs-2f7717f601c768019ee2a73a7f3535c5de74512b.tar.gz
emacs-2f7717f601c768019ee2a73a7f3535c5de74512b.zip
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-754
Merge from gnus--rel--5.10 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-81 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-82 Update from CVS 2004-12-27 Simon Josefsson <jas@extundo.com> * lisp/gnus/mm-bodies.el (mm-body-encoding): Don't permit 7-bit to be used when mm-use-ultra-safe-encoding is enabled (e.g., for PGP/MIME) and we have trailing white space. Reported by Werner Koch <wk@gnupg.org>.
-rw-r--r--lisp/gnus/ChangeLog7
-rw-r--r--lisp/gnus/mm-bodies.el5
2 files changed, 10 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index fd541fed5aa..46a1449ce79 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,10 @@
12004-12-27 Simon Josefsson <jas@extundo.com>
2
3 * mm-bodies.el (mm-body-encoding): Don't permit 7-bit to be used
4 when mm-use-ultra-safe-encoding is enabled (e.g., for PGP/MIME)
5 and we have trailing white space. Reported by Werner Koch
6 <wk@gnupg.org>.
7
12004-12-17 Kim F. Storm <storm@cua.dk> 82004-12-17 Kim F. Storm <storm@cua.dk>
2 9
3 * gnus-group.el (gnus-group-mode-map): Map follow-link to mouse-face. 10 * gnus-group.el (gnus-group-mode-map): Map follow-link to mouse-face.
diff --git a/lisp/gnus/mm-bodies.el b/lisp/gnus/mm-bodies.el
index b3148fe04ac..a1d67cf1f93 100644
--- a/lisp/gnus/mm-bodies.el
+++ b/lisp/gnus/mm-bodies.el
@@ -1,6 +1,6 @@
1;;; mm-bodies.el --- Functions for decoding MIME things 1;;; mm-bodies.el --- Functions for decoding MIME things
2 2
3;; Copyright (C) 1998, 1999, 2000, 2001, 2003 3;; Copyright (C) 1998, 1999, 2000, 2001, 2003, 2004
4;; Free Software Foundation, Inc. 4;; Free Software Foundation, Inc.
5 5
6;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> 6;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -139,7 +139,8 @@ If no encoding was done, nil is returned."
139 (cond 139 (cond
140 ((and (not longp) 140 ((and (not longp)
141 (not (and mm-use-ultra-safe-encoding 141 (not (and mm-use-ultra-safe-encoding
142 (save-excursion (re-search-forward "^From " nil t)))) 142 (or (save-excursion (re-search-forward " $" nil t))
143 (save-excursion (re-search-forward "^From " nil t)))))
143 (eq bits '7bit)) 144 (eq bits '7bit))
144 bits) 145 bits)
145 ((and (not mm-use-ultra-safe-encoding) 146 ((and (not mm-use-ultra-safe-encoding)