Commit 9fa128e8 authored by Noah Friedman's avatar Noah Friedman

(rlogin): Call rlogin-mode after adding rlogin-carriage-filter to output

filter functions, so user can remove it if desired.
parent dc929aa9
......@@ -23,7 +23,7 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
;; $Id: rlogin.el,v 1.30 1995/10/27 22:34:50 friedman Exp erik $
;; $Id: rlogin.el,v 1.31 1996/01/14 07:34:30 erik Exp friedman $
;;; Commentary:
......@@ -180,13 +180,14 @@ variable."
;; Set process-mark to point-max in case there is text in the
;; buffer from a previous exited process.
(set-marker (process-mark proc) (point-max))
(rlogin-mode)
;; comint-output-filter-functions is just like a hook, except that the
;; functions in that list are passed arguments. add-hook serves well
;; enough for modifying it.
(add-hook 'comint-output-filter-functions 'rlogin-carriage-filter)
(rlogin-mode)
(make-local-variable 'rlogin-host)
(setq rlogin-host host)
(make-local-variable 'rlogin-remote-user)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment