emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/net/ange-ftp.el


From: Richard M. Stallman
Subject: [Emacs-diffs] Changes to emacs/lisp/net/ange-ftp.el
Date: Fri, 21 Dec 2001 18:57:20 -0500

Index: emacs/lisp/net/ange-ftp.el
diff -c emacs/lisp/net/ange-ftp.el:1.17 emacs/lisp/net/ange-ftp.el:1.18
*** emacs/lisp/net/ange-ftp.el:1.17     Sat Oct 27 03:51:38 2001
--- emacs/lisp/net/ange-ftp.el  Fri Dec 21 18:57:20 2001
***************
*** 3454,3460 ****
      ;; address@hidden reports that is returns something different
      ;; for at least one FTP server.  So, let's use the response only
      ;; if it matches the Internet draft.
!     (when (string-match "^213 [0-9]\\{14\\}$" line)
        (setq modtime
            (encode-time
             (string-to-number (substring line 16 18))
--- 3454,3460 ----
      ;; address@hidden reports that is returns something different
      ;; for at least one FTP server.  So, let's use the response only
      ;; if it matches the Internet draft.
!     (when (save-match-data (string-match "^213 [0-9]\\{14\\}$" line))
        (setq modtime
            (encode-time
             (string-to-number (substring line 16 18))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]