1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-19 18:13:55 +00:00

(command-line): No longer enable Xterm Mouse mode by default in

terminals compatible with xterm.
This commit is contained in:
Luc Teirlinck 2005-04-18 00:55:42 +00:00
parent 2f530b587d
commit b7e325a809

View File

@ -755,16 +755,6 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
(not (fboundp 'x-show-tip)))
(tooltip-mode 1))
;; If you change the code below, you need to also change the
;; corresponding code in the xterm-mouse-mode defcustom. The two need
;; to be equivalent under all conditions, or Custom will get confused.
(unless (or noninteractive
window-system)
(let ((term (getenv "TERM")))
(and term
(string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)" term)
(xterm-mouse-mode 1))))
;; Register default TTY colors for the case the terminal hasn't a
;; terminal init file.
(unless (memq window-system '(x w32))