[Emacs-diffs] Changes to emacs/lisp/gnus/pop3.el

[Miles Bader]

Index: emacs/lisp/gnus/pop3.el
diff -c emacs/lisp/gnus/pop3.el:1.27 emacs/lisp/gnus/pop3.el:1.28
*** emacs/lisp/gnus/pop3.el:1.27        Wed Feb  9 15:50:37 2005
--- emacs/lisp/gnus/pop3.el     Mon May 30 17:13:58 2005
***************
*** 398,405 ****
    "Return the number of messages in the maildrop and the maildrop's size."
    (pop3-send-command process "STAT")
    (let ((response (pop3-read-response process t)))
!     (list (string-to-int (nth 1 (split-string response " ")))
!         (string-to-int (nth 2 (split-string response " "))))
      ))
  
  (defun pop3-list (process &optional msg)
--- 398,405 ----
    "Return the number of messages in the maildrop and the maildrop's size."
    (pop3-send-command process "STAT")
    (let ((response (pop3-read-response process t)))
!     (list (string-to-number (nth 1 (split-string response " ")))
!         (string-to-number (nth 2 (split-string response " "))))
      ))
  
  (defun pop3-list (process &optional msg)
***************
*** 449,455 ****
    "Return highest accessed message-id number for the session."
    (pop3-send-command process "LAST")
    (let ((response (pop3-read-response process t)))
!     (string-to-int (nth 1 (split-string response " ")))
      ))
  
  (defun pop3-rset (process)
--- 449,455 ----
    "Return highest accessed message-id number for the session."
    (pop3-send-command process "LAST")
    (let ((response (pop3-read-response process t)))
!     (string-to-number (nth 1 (split-string response " ")))
      ))
  
  (defun pop3-rset (process)