summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-11-25 06:51:50 +0000
committerRichard M. Stallman <rms@gnu.org>1993-11-25 06:51:50 +0000
commitf469f80c7d95ab4bc4a85279caf8a32fbba38962 (patch)
tree2280099d573a6ec3b4f16a48bbfe4c9442b88a4c /lisp
parent7819b9be12feadea6d132db28259d74e9c140e62 (diff)
downloademacs-f469f80c7d95ab4bc4a85279caf8a32fbba38962.tar.gz
emacs-f469f80c7d95ab4bc4a85279caf8a32fbba38962.tar.bz2
emacs-f469f80c7d95ab4bc4a85279caf8a32fbba38962.zip
(ange-ftp-binary-file-name-regexp): Accept .tgz and .taz files.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ange-ftp.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 57313dcbffc..099d60660f3 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -707,7 +707,8 @@ 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-..$\\|\\.gz$")
+ "\\.EXE\\(;[0-9]+\\)?$\\|\\.[zZ]-part-..$\\|\\.gz$\\|"
+ "\\.taz$\\|\\.tgz$")
"*If a file matches this regexp then it is transferred in binary mode.")
(defvar ange-ftp-gateway-host nil
@@ -856,7 +857,7 @@ SIZE, if supplied, should be a prime number."
;;;; Internal variables.
;;;; ------------------------------------------------------------
-(defconst ange-ftp-version "$Revision: 1.35 $")
+(defconst ange-ftp-version "$Revision: 1.36 $")
(defvar ange-ftp-data-buffer-name " *ftp data*"
"Buffer name to hold directory listing data received from ftp process.")