diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-06-03 03:53:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-06-03 03:53:33 +0000 |
| commit | 71b3c0e6c6144e2e4a704cec074fe635875d630a (patch) | |
| tree | 03100828a5455acf839100606f389de2cba903dc /lisp/ange-ftp.el | |
| parent | 70447f8cea67b6dbec03e8adfa085b2ac8f0080e (diff) | |
| download | emacs-71b3c0e6c6144e2e4a704cec074fe635875d630a.tar.gz | |
(ange-ftp-binary-file-name-regexp): Handle .gz.
Diffstat (limited to 'lisp/ange-ftp.el')
| -rw-r--r-- | lisp/ange-ftp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 69fd2f9cc1e..af20e6df8c3 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el @@ -707,7 +707,7 @@ process uses the \'dir\' command to get directory information.") (defvar ange-ftp-binary-file-name-regexp (concat "\\.[zZ]$\\|\\.lzh$\\|\\.arc$\\|\\.zip$\\|\\.zoo$\\|\\.tar$\\|" "\\.dvi$\\|\\.ps$\\|\\.elc$\\|TAGS$\\|\\.gif$\\|" - "\\.EXE\\(;[0-9]+\\)?$\\|\\.[zZ]-part-..$") + "\\.EXE\\(;[0-9]+\\)?$\\|\\.[zZ]-part-..$\\|\\.gz$") "*If a file matches this regexp then it is transferred in binary mode.") (defvar ange-ftp-gateway-host nil @@ -856,7 +856,7 @@ SIZE, if supplied, should be a prime number." ;;;; Internal variables. ;;;; ------------------------------------------------------------ -(defconst ange-ftp-version "$Revision: 1.20 $") +(defconst ange-ftp-version "$Revision: 1.21 $") (defvar ange-ftp-data-buffer-name " *ftp data*" "Buffer name to hold directory listing data received from ftp process.") |