Mercurial > emacs

diff lisp/xt-mouse.el @ 90147:e1fbb019c538

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-39 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 258-271) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 66) - Update from CVS
author Miles Bader <miles@gnu.org>
date Thu, 21 Apr 2005 05:59:53 +0000
parents 146c086df160 143ba4d2beac
children f9a65d7ebd29
line wrap: on
line diff
--- a/lisp/xt-mouse.el	Thu Apr 21 05:57:27 2005 +0000
+++ b/lisp/xt-mouse.el	Thu Apr 21 05:59:53 2005 +0000
@@ -162,15 +162,6 @@
 mouse functionality for such clicks is still available by holding
 down the SHIFT key while pressing the mouse button."
   :global t :group 'mouse
-   ;; If you change the code below, you also need to change the
-   ;; corresponding code in startup.el.
-  :init-value (unless (or noninteractive
-			  window-system)
-		(let ((term (getenv "TERM")))
-		  (and term
-		       (string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)"
-				     term)
-		       t)))
   (if xterm-mouse-mode
       ;; Turn it on
       (unless window-system