Commit | Line | Data |
---|---|---|
8c8b8430 | 1 | ;;; url-ftp.el --- FTP wrapper |
00eef4de | 2 | |
71ddfde5 | 3 | ;; Copyright (C) 1996, 1997, 1998, 1999, 2004, |
12dc447f | 4 | ;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. |
00eef4de | 5 | |
8c8b8430 SM |
6 | ;; Keywords: comm, data, processes |
7 | ||
00eef4de LH |
8 | ;; This file is part of GNU Emacs. |
9 | ||
10 | ;; GNU Emacs is free software; you can redistribute it and/or modify | |
11 | ;; it under the terms of the GNU General Public License as published by | |
8c0ee52a | 12 | ;; the Free Software Foundation; either version 3, or (at your option) |
00eef4de LH |
13 | ;; any later version. |
14 | ||
15 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
16 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | ;; GNU General Public License for more details. | |
19 | ||
20 | ;; You should have received a copy of the GNU General Public License | |
21 | ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
4fc5845f LK |
22 | ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
23 | ;; Boston, MA 02110-1301, USA. | |
00eef4de LH |
24 | |
25 | ;;; Commentary: | |
8c8b8430 SM |
26 | |
27 | ;; We knew not what we did when we overloaded 'file' to mean 'file' | |
28 | ;; and 'ftp' back in the dark ages of the web. | |
29 | ;; | |
30 | ;; This stub file is just here to please the auto-scheme-loading code | |
31 | ;; in url-methods.el and just maps everything onto the code in | |
32 | ;; url-file. | |
33 | ||
00eef4de LH |
34 | ;;; Code: |
35 | ||
8c8b8430 SM |
36 | (require 'url-parse) |
37 | (require 'url-file) | |
38 | ||
39 | (defconst url-ftp-default-port 21 "Default FTP port.") | |
40 | (defconst url-ftp-asynchronous-p t "FTP transfers are asynchronous.") | |
41 | (defalias 'url-ftp-expand-file-name 'url-default-expander) | |
42 | (defalias 'url-ftp 'url-file) | |
43 | ||
44 | (provide 'url-ftp) | |
e5566bd5 MB |
45 | |
46 | ;;; arch-tag: 9c3e70c4-350f-4d4a-bb51-a1e9b459e7dc | |
00eef4de | 47 | ;;; url-ftp.el ends here |