mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-24 05:22:04 -08:00
Code Issues Projects Releases Wiki Activity

(ange-ftp-file-modtime): Use save-match-data.

Browse source
This commit is contained in:
Richard M. Stallman 2001-12-21 23:58:23 +00:00
parent 04a96d5012
commit 03f0813fc1
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/net/ange-ftp.el
View file

@ -3442,7 +3442,7 @@ Value is (0 0) if the modification time cannot be determined."
;; Bob@rattlesnake.com 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)
(when (save-match-data (string-match "^213 [0-9]\\{14\\}$" line))
(setq modtime
(encode-time
(string-to-number (substring line 16 18))