(internal-ange-ftp-mode): Add a mode-class property.

1997-05-05 01:05:04 +00:00
parent b741439511
commit bcfe983bc3
1 changed files with 2 additions and 0 deletions
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -1847,6 +1847,8 @@ on the gateway machine to do the ftp instead."
    (accept-process-output proc)	;wait for ftp startup message
    proc))

+(put 'internal-ange-ftp-mode 'mode-class 'special)
+
 (defun internal-ange-ftp-mode ()
  "Major mode for interacting with the FTP process.