154 |
;; instead of "\n". |
;; instead of "\n". |
155 |
(defun telnet-simple-send (proc string) |
(defun telnet-simple-send (proc string) |
156 |
(comint-send-string proc string) |
(comint-send-string proc string) |
157 |
(comint-send-string proc telnet-new-line)) |
(if comint-input-sender-no-newline |
158 |
|
(if (not (string-equal input "")) |
159 |
|
(process-send-eof)) |
160 |
|
(comint-send-string proc telnet-new-line))) |
161 |
|
|
162 |
(defun telnet-filter (proc string) |
(defun telnet-filter (proc string) |
163 |
(save-excursion |
(save-excursion |