diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-04-08 22:54:56 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-04-08 22:54:56 +0000 |
| commit | 7524d5cee6309685010bc8a1b482ff27672fc038 (patch) | |
| tree | 76084f843fc3fa6aa5c4c624c441d38059d21ac2 | |
| parent | 33182c8a9e8515a8235b562176c75bac3ef9c0d0 (diff) | |
| download | emacs-7524d5cee6309685010bc8a1b482ff27672fc038.tar.gz | |
(pop3-md5): Don't hardcode point-min == 1.
| -rw-r--r-- | lisp/gnus/pop3.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 99148388aa8..0a182b47ca7 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -332,7 +332,7 @@ If NOW, use that time instead." 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." |