changeset 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 7798da904366
children b62714db7e04
files lisp/gnus/pop3.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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."