diff options
| author | Richard M. Stallman | 1997-05-05 01:05:04 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-05 01:05:04 +0000 |
| commit | bcfe983bc3775bd49ad03c9bc63f7bc78d690ca7 (patch) | |
| tree | 0f97f22605285b0004c7aaf8be0da140a57bc736 /lisp | |
| parent | b741439511d7ada382d17eb25bda4d87667f8531 (diff) | |
| download | emacs-bcfe983bc3775bd49ad03c9bc63f7bc78d690ca7.tar.gz emacs-bcfe983bc3775bd49ad03c9bc63f7bc78d690ca7.zip | |
(internal-ange-ftp-mode): Add a mode-class property.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ange-ftp.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 3586dc4a35c..74c080ba98c 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el | |||
| @@ -1847,6 +1847,8 @@ on the gateway machine to do the ftp instead." | |||
| 1847 | (accept-process-output proc) ;wait for ftp startup message | 1847 | (accept-process-output proc) ;wait for ftp startup message |
| 1848 | proc)) | 1848 | proc)) |
| 1849 | 1849 | ||
| 1850 | (put 'internal-ange-ftp-mode 'mode-class 'special) | ||
| 1851 | |||
| 1850 | (defun internal-ange-ftp-mode () | 1852 | (defun internal-ange-ftp-mode () |
| 1851 | "Major mode for interacting with the FTP process. | 1853 | "Major mode for interacting with the FTP process. |
| 1852 | 1854 | ||