diff options
author | ShengHuo ZHU <[email protected]> | 2000-12-15 15:13:29 +0000 |
---|---|---|
committer | ShengHuo ZHU <[email protected]> | 2000-12-15 15:13:29 +0000 |
commit | 4c4b227a1de56650da33fd92dce621b6082dc470 (patch) | |
tree | 8f0de31db483c7d3276cf1406372f5bc0f2b8ce8 | |
parent | 7a39158f7cd551861aa92b63638d1a21c75bb1b0 (diff) |
2000-12-15 ShengHuo ZHU <[email protected]>
* pop3.el (pop3-movemail): Use binary.
(pop3-movemail-file-coding-system): Removed.
-rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/gnus/pop3.el | 5 |
2 files changed, 6 insertions, 4 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4636cf3dd2..4ac5f8e516 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2000-12-15 ShengHuo ZHU <[email protected]> + + * pop3.el (pop3-movemail): Use binary. + (pop3-movemail-file-coding-system): Removed. + 2000-12-13 Miles Bader <[email protected]> * smiley-ems.el (smiley-region): Bind `inhibit-point-motion-hooks' diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 9fb20725b9..aa040d228f 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -58,9 +58,6 @@ values are 'apop.") "Timestamp returned when initially connected to the POP server. Used for APOP authentication.") -(defvar pop3-movemail-file-coding-system nil - "Coding system for the crashbox made by `pop3-movemail'.") - (defvar pop3-read-point nil) (defvar pop3-debug nil) @@ -93,7 +90,7 @@ Used for APOP authentication.") (pop3-retr process n crashbuf) (save-excursion (set-buffer crashbuf) - (let ((coding-system-for-write pop3-movemail-file-coding-system)) + (let ((coding-system-for-write 'binary)) (write-region (point-min) (point-max) crashbox t 'nomesg)) (set-buffer (process-buffer process)) (while (> (buffer-size) 5000) |