diff lisp/gnus/pop3.el @ 44452:a7836a045796

(pop3-md5): Don't hardcode point-min == 1.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 08 Apr 2002 22:54:56 +0000
parents 253f761ad37b
children 1910e7c74f9f
line wrap: on
line diff
--- a/lisp/gnus/pop3.el	Mon Apr 08 22:53:31 2002 +0000
+++ b/lisp/gnus/pop3.el	Mon Apr 08 22:54:56 2002 +0000
@@ -332,7 +332,7 @@
 			     t (current-buffer) nil)
 	;; The meaningful output is the first 32 characters.
 	;; Don't return the newline that follows them!
-	(buffer-substring 1 33)))))
+	(buffer-substring (point-min) (+ 32 (point-min)))))))
 
 (defun pop3-stat (process)
   "Return the number of messages in the maildrop and the maildrop's size."