(tramp-handle-ange-ftp): Move interactive spec

after doc string.
This commit is contained in:
Andreas Schwab
2002-07-03 18:42:34 +00:00
parent 5ec2752af6
commit 210accc8a7
2 changed files with 6 additions and 1 deletions

View File

@@ -1,3 +1,8 @@
2002-07-03 Andreas Schwab <schwab@suse.de>
* net/tramp.el (tramp-handle-ange-ftp): Move interactive spec
after doc string.
2002-07-03 Juanma Barranquero <lektu@terra.es>
* net/tramp.el (tramp-send-eof): Fix typo.

View File

@@ -2973,11 +2973,11 @@ Falls back to normal file name handler if no tramp file name handler exists."
;;;###autoload
(defun tramp-handle-ange-ftp ()
(interactive)
"Turn Ange-FTP off and an Ange-FTP-like filename format.
Requests suitable for Ange-FTP will be forwarded to Ange-FTP.
Also see the variables `tramp-ftp-method', `tramp-default-method',
and `tramp-default-method-alist'."
(interactive)
(let ((a1 (rassq 'ange-ftp-hook-function file-name-handler-alist))
(a2 (rassq 'ange-ftp-completion-hook-function file-name-handler-alist))
(a3 (rassq 'tramp-file-name-handler file-name-handler-alist)))