martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(vt-keypad-on, vt-keypad-off): Updated codes sent

Browse Source 
to terminal to eliminate some garbage that made NCSA telnet crash.
This commit is contained in:
Richard M. Stallman
1995-06-22 20:28:55 +00:00
parent 37a985474f
commit c96c7ed95f
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/vt-control.el
View File

@@ -86,14 +86,14 @@
(defun vt-keypad-on (&optional tell)
"Turn on the VT applications keypad."
(interactive)
(send-string-to-terminal "\e[\e=")
(send-string-to-terminal "\e=")
(setq vt-applications-keypad-p t)
(if (or tell (interactive-p)) (message "Applications keypad enabled.")))
(defun vt-keypad-off (&optional tell)
"Turn off the VT applications keypad."
(interactive "p")
(send-string-to-terminal "\e[\e>")
(send-string-to-terminal "\e>")
(setq vt-applications-keypad-p nil)
(if (or tell (interactive-p)) (message "Applications keypad disabled.")))