# HG changeset patch
# User ShengHuo ZHU <zsh@cs.rochester.edu>
# Date 976893209 0
# Node ID 81ecf6fce11a11fa47c02761b7e1a275eca875e1
# Parent  1759a33745782b53e6c7ac0125f14ea80a8c64d8
2000-12-15  ShengHuo ZHU  <zsh@cs.rochester.edu>

	* pop3.el (pop3-movemail): Use binary.
	(pop3-movemail-file-coding-system): Removed.

diff -r 1759a3374578 -r 81ecf6fce11a lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Fri Dec 15 15:07:18 2000 +0000
+++ b/lisp/gnus/ChangeLog	Fri Dec 15 15:13:29 2000 +0000
@@ -1,3 +1,8 @@
+2000-12-15  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+	* pop3.el (pop3-movemail): Use binary.
+	(pop3-movemail-file-coding-system): Removed.
+
 2000-12-13  Miles Bader  <miles@gnu.org>
 
 	* smiley-ems.el (smiley-region): Bind `inhibit-point-motion-hooks'
diff -r 1759a3374578 -r 81ecf6fce11a lisp/gnus/pop3.el
--- a/lisp/gnus/pop3.el	Fri Dec 15 15:07:18 2000 +0000
+++ b/lisp/gnus/pop3.el	Fri Dec 15 15:13:29 2000 +0000
@@ -58,9 +58,6 @@
   "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 @@
 	  (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)