(rlogin-mode): Add a mode-class property.

1 files changed, 3 insertions, 1 deletions

diff --git a/lisp/rlogin.el b/lisp/rlogin.el
index bfe9eb63763..05e109e65f3 100644
--- a/lisp/rlogin.el
+++ b/lisp/rlogin.el
@@ -23,7 +23,7 @@
 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 ;; Boston, MA 02111-1307, USA.
 
-;; $Id: rlogin.el,v 1.37 1997/04/12 02:55:04 rms Exp $
+;; $Id: rlogin.el,v 1.38 1997/04/15 10:39:07 friedman Exp rms $
 
 ;;; Commentary:
 
@@ -245,6 +245,8 @@ variable."
                  (cd-absolute (concat comint-file-name-prefix "~/"))))
         (error nil))))))
 
+(put 'rlogin-mode 'mode-class 'special)
+
 (defun rlogin-mode ()
   "Set major-mode for rlogin sessions.
 If `rlogin-mode-hook' is set, run it."