From b7e325a809f1590a892800723e40eab71f855991 Mon Sep 17 00:00:00 2001 From: Luc Teirlinck Date: Mon, 18 Apr 2005 00:55:42 +0000 Subject: [PATCH] (command-line): No longer enable Xterm Mouse mode by default in terminals compatible with xterm. --- lisp/startup.el | 10 ---------- 1 file changed, 10 deletions(-) diff --git a/lisp/startup.el b/lisp/startup.el index 1919c2837f8..a3d69564cfd 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -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)) -- 2.39.2