aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog10
-rw-r--r--lisp/gnus/mml2015.el2
-rw-r--r--lisp/gnus/nneething.el2
3 files changed, 12 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 68c82da1c6b..787a5d58c6f 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,13 @@
12006-11-30 Katsumi Yamaoka <yamaoka@jpl.org>
2
3 * mml2015.el (mml2015-pgg-clear-verify): Replace encode-coding-string
4 with mm-encode-coding-string.
5
62006-11-29 Katsumi Yamaoka <yamaoka@jpl.org>
7
8 * nneething.el (nneething-decode-file-name): Replace
9 decode-coding-string with mm-decode-coding-string.
10
12006-11-24 Juanma Barranquero <lekktu@gmail.com> 112006-11-24 Juanma Barranquero <lekktu@gmail.com>
2 12
3 * gnus-agent.el (gnus-agent-expire-unagentized-dirs) 13 * gnus-agent.el (gnus-agent-expire-unagentized-dirs)
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el
index 591ef647678..6c58272509e 100644
--- a/lisp/gnus/mml2015.el
+++ b/lisp/gnus/mml2015.el
@@ -785,7 +785,7 @@
785 (if (condition-case err 785 (if (condition-case err
786 (prog1 786 (prog1
787 (mm-with-unibyte-buffer 787 (mm-with-unibyte-buffer
788 (insert (encode-coding-string text coding-system)) 788 (insert (mm-encode-coding-string text coding-system))
789 (pgg-verify-region (point-min) (point-max) nil t)) 789 (pgg-verify-region (point-min) (point-max) nil t))
790 (goto-char (point-min)) 790 (goto-char (point-min))
791 (while (search-forward "\r\n" nil t) 791 (while (search-forward "\r\n" nil t)
diff --git a/lisp/gnus/nneething.el b/lisp/gnus/nneething.el
index 92a62d12386..4b5f1871aa3 100644
--- a/lisp/gnus/nneething.el
+++ b/lisp/gnus/nneething.el
@@ -303,7 +303,7 @@ included.")
303 (setq buf (cons (string (string-to-number (match-string 1 file) 16)) 303 (setq buf (cons (string (string-to-number (match-string 1 file) 16))
304 (cons (substring file pos (match-beginning 0)) buf)) 304 (cons (substring file pos (match-beginning 0)) buf))
305 pos (match-end 0))) 305 pos (match-end 0)))
306 (decode-coding-string 306 (mm-decode-coding-string
307 (apply (function concat) 307 (apply (function concat)
308 (nreverse (cons (substring file pos) buf))) 308 (nreverse (cons (substring file pos) buf)))
309 (or coding-system nnmail-pathname-coding-system)))) 309 (or coding-system nnmail-pathname-coding-system))))