Mercurial > emacs
diff lisp/kermit.el @ 49597:e88404e8f2cf
Trailing whitespace deleted.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Tue, 04 Feb 2003 12:29:42 +0000 |
parents | 253f761ad37b |
children | 695cf19ef79e d7ddb3e565de |
line wrap: on
line diff
--- a/lisp/kermit.el Tue Feb 04 12:03:59 2003 +0000 +++ b/lisp/kermit.el Tue Feb 04 12:29:42 2003 +0000 @@ -54,7 +54,7 @@ ;; ^C^Q^C to send an interrupt, and ^C^Q^Z for a stop signal, etc. (since ^C^C ;; just generates a local stop signal, which kermit ignores). ;; To connect to a VMS system, I use a shell script to invoke kermit thru the -;; tr filter, do "M-X kermit-send-cr", and then tell VMS that I'm on a +;; tr filter, do "M-X kermit-send-cr", and then tell VMS that I'm on a ;; half-duplex terminal. ;; Some caveats: @@ -84,14 +84,14 @@ (defun kermit-esc () "For sending escape sequences to a kermit running in shell mode." (interactive) - (process-send-string + (process-send-string (get-buffer-process (current-buffer)) (concat kermit-esc-char (char-to-string (read-char))))) (defun kermit-send-char () "Send an arbitrary character to a program in shell mode." (interactive) - (process-send-string + (process-send-string (get-buffer-process (current-buffer)) (char-to-string (read-char))))