# HG changeset patch # User Andreas Schwab # Date 1025721743 0 # Node ID 56e301cdd7302729a72b5778f44ede8dfaa38d00 # Parent 17cf3d3424cfadfe7290c29aeb12e510a027ec1e (tramp-handle-ange-ftp): Move interactive spec after doc string. diff -r 17cf3d3424cf -r 56e301cdd730 lisp/net/tramp.el --- a/lisp/net/tramp.el Wed Jul 03 14:32:01 2002 +0000 +++ b/lisp/net/tramp.el Wed Jul 03 18:42:23 2002 +0000 @@ -2973,11 +2973,11 @@ ;;;###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)))