/[emacs]/emacs/lisp/net/ange-ftp.el
ViewVC logotype

Diff of /emacs/lisp/net/ange-ftp.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14.4.1 by gerd, Sat Oct 27 07:54:14 2001 UTC revision 1.14.4.2 by rms, Fri Dec 21 23:58:23 2001 UTC
# Line 3442  Value is (0 0) if the modification time Line 3442  Value is (0 0) if the modification time
3442      ;; Bob@rattlesnake.com reports that is returns something different      ;; Bob@rattlesnake.com reports that is returns something different
3443      ;; for at least one FTP server.  So, let's use the response only      ;; for at least one FTP server.  So, let's use the response only
3444      ;; if it matches the Internet draft.      ;; if it matches the Internet draft.
3445      (when (string-match "^213 [0-9]\\{14\\}$" line)      (when (save-match-data (string-match "^213 [0-9]\\{14\\}$" line))
3446        (setq modtime        (setq modtime
3447              (encode-time              (encode-time
3448               (string-to-number (substring line 16 18))               (string-to-number (substring line 16 18))

Legend:
Removed from v.1.14.4.1  
changed lines
  Added in v.1.14.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26