Mercurial > emacs
comparison lisp/xt-mouse.el @ 41814:42c496dc0b7d
(turn-off-xterm-mouse-tracking): Doc fix.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Tue, 04 Dec 2001 16:12:48 +0000 |
| parents | 75f49513b989 |
| children | 53a8da1bdd13 |
comparison
equal
deleted
inserted
replaced
| 41813:d66dd6bce30c | 41814:42c496dc0b7d |
|---|---|
| 190 "Enable Emacs mouse tracking in xterm." | 190 "Enable Emacs mouse tracking in xterm." |
| 191 (if xterm-mouse-mode | 191 (if xterm-mouse-mode |
| 192 (send-string-to-terminal "\e[?1000h"))) | 192 (send-string-to-terminal "\e[?1000h"))) |
| 193 | 193 |
| 194 (defun turn-off-xterm-mouse-tracking () | 194 (defun turn-off-xterm-mouse-tracking () |
| 195 "Disable disable Emacs mouse tracking in xterm." | 195 "Disable Emacs mouse tracking in xterm." |
| 196 (if xterm-mouse-mode | 196 (if xterm-mouse-mode |
| 197 (send-string-to-terminal "\e[?1000l"))) | 197 (send-string-to-terminal "\e[?1000l"))) |
| 198 | 198 |
| 199 ;; Restore normal mouse behaviour outside Emacs. | 199 ;; Restore normal mouse behaviour outside Emacs. |
| 200 (add-hook 'suspend-hook 'turn-off-xterm-mouse-tracking) | 200 (add-hook 'suspend-hook 'turn-off-xterm-mouse-tracking) |