Fix two parse-time-months invalid assumptions

* lisp/gnus/nnimap.el: Do not require parse-time.
* lisp/gnus/nnimap.el (nnimap-find-expired-articles):
* lisp/net/pop3.el (pop3-make-date):
Just use system-time-locale and format-time-string; no need to
refer to parse-time-months.
* lisp/net/pop3.el (parse-time-months): Remove defvar.
* lisp/net/tramp-smb.el (tramp-smb-read-file-entry):
Add FIXME comment about this.

1 files changed, 2 insertions, 7 deletions

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index c6eaa54c692..0c5aaf32d42 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -36,7 +36,6 @@
 (require 'nnoo)
 (require 'netrc)
 (require 'utf7)
-(require 'parse-time)
 (require 'nnmail)
 
 (autoload 'auth-source-forget+ "auth-source")
@@ -1097,12 +1096,8 @@ textual parts.")
         (let ((result
                (nnimap-command
                 "UID SEARCH SENTBEFORE %s"
-                (format-time-string
-                 (format "%%d-%s-%%Y"
-                         (upcase
-                          (car (rassoc (decoded-time-month (decode-time cutoff))
-                                       parse-time-months))))
-                 cutoff))))
+                (let ((system-time-locale "C"))
+                  (upcase (format-time-string "%d-%b-%Y" cutoff))))))
           (and (car result)
                (delete 0 (mapcar #'string-to-number
                                  (cdr (assoc "SEARCH" (cdr result)))))))))))