aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/net
diff options
context:
space:
mode:
authorGlenn Morris2009-08-22 21:59:40 +0000
committerGlenn Morris2009-08-22 21:59:40 +0000
commita337468045409bc0d9179f4cdda010dbab2a5989 (patch)
treece85d6ca33e474a2c4acb3e14160c8ff9a9bb9e3 /lisp/net
parent3f12e3f4bf054763b6507577e72a55a02302ace7 (diff)
downloademacs-a337468045409bc0d9179f4cdda010dbab2a5989.tar.gz
emacs-a337468045409bc0d9179f4cdda010dbab2a5989.zip
Remove code for defunct system-types emx, macos, mswindows,
unisoft-unix, vax-vms, win32, w32.
Diffstat (limited to 'lisp/net')
-rw-r--r--lisp/net/ange-ftp.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index 2c20e8c94d8..8499a896db6 100644
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -1,7 +1,8 @@
1;;; ange-ftp.el --- transparent FTP support for GNU Emacs 1;;; ange-ftp.el --- transparent FTP support for GNU Emacs
2 2
3;; Copyright (C) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1998, 3;; Copyright (C) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1998,
4;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. 4;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
5;; Free Software Foundation, Inc.
5 6
6;; Author: Andy Norman (ange@hplb.hpl.hp.com) 7;; Author: Andy Norman (ange@hplb.hpl.hp.com)
7;; Maintainer: FSF 8;; Maintainer: FSF
@@ -3220,7 +3221,7 @@ system TYPE.")
3220 ;; regardless. Maybe a system-type to host-type lookup? 3221 ;; regardless. Maybe a system-type to host-type lookup?
3221 (binary (or (ange-ftp-binary-file filename) 3222 (binary (or (ange-ftp-binary-file filename)
3222 (and (not (memq system-type 3223 (and (not (memq system-type
3223 '(ms-dos windows-nt macos vax-vms))) 3224 '(ms-dos windows-nt)))
3224 (memq (ange-ftp-host-type host user) 3225 (memq (ange-ftp-host-type host user)
3225 '(unix dumb-unix))))) 3226 '(unix dumb-unix)))))
3226 (cmd (if append 'append 'put)) 3227 (cmd (if append 'append 'put))