[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/telnet.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/telnet.el |
Date: |
Tue, 04 Feb 2003 08:17:20 -0500 |
Index: emacs/lisp/net/telnet.el
diff -c emacs/lisp/net/telnet.el:1.4 emacs/lisp/net/telnet.el:1.5
*** emacs/lisp/net/telnet.el:1.4 Wed Jan 16 20:40:04 2002
--- emacs/lisp/net/telnet.el Tue Feb 4 08:17:16 2003
***************
*** 30,36 ****
;; sessions are supported.
;;
;; Normally, input is sent to the remote telnet/rsh line-by-line, as you
! ;; type RET or LFD. C-c C-c sends a C-c to the remote immediately;
;; C-c C-z sends C-z immediately. C-c C-q followed by any character
;; sends that character immediately.
;;
--- 30,36 ----
;; sessions are supported.
;;
;; Normally, input is sent to the remote telnet/rsh line-by-line, as you
! ;; type RET or LFD. C-c C-c sends a C-c to the remote immediately;
;; C-c C-z sends C-z immediately. C-c C-q followed by any character
;; sends that character immediately.
;;
***************
*** 112,118 ****
(define-key telnet-mode-map "\C-m" 'telnet-send-input)
; (define-key telnet-mode-map "\C-j" 'telnet-send-input)
(define-key telnet-mode-map "\C-c\C-q" 'send-process-next-char)
! (define-key telnet-mode-map "\C-c\C-c" 'telnet-interrupt-subjob)
(define-key telnet-mode-map "\C-c\C-z" 'telnet-c-z))
;;maybe should have a flag for when have found type
--- 112,118 ----
(define-key telnet-mode-map "\C-m" 'telnet-send-input)
; (define-key telnet-mode-map "\C-j" 'telnet-send-input)
(define-key telnet-mode-map "\C-c\C-q" 'send-process-next-char)
! (define-key telnet-mode-map "\C-c\C-c" 'telnet-interrupt-subjob)
(define-key telnet-mode-map "\C-c\C-z" 'telnet-c-z))
;;maybe should have a flag for when have found type
***************
*** 214,220 ****
process)
(if (and buffer (get-buffer-process buffer))
(pop-to-buffer (concat "*" name "*"))
! (pop-to-buffer
(apply 'make-comint name telnet-program nil telnet-options))
(setq process (get-buffer-process (current-buffer)))
(set-process-filter process 'telnet-initial-filter)
--- 214,220 ----
process)
(if (and buffer (get-buffer-process buffer))
(pop-to-buffer (concat "*" name "*"))
! (pop-to-buffer
(apply 'make-comint name telnet-program nil telnet-options))
(setq process (get-buffer-process (current-buffer)))
(set-process-filter process 'telnet-initial-filter)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/net/telnet.el,
Juanma Barranquero <=