summaryrefslogtreecommitdiff
path: root/lisp/term/linux.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/term/linux.el')
-rw-r--r--lisp/term/linux.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/term/linux.el b/lisp/term/linux.el
index 7fa9a96e9bd..fdd8e2229ac 100644
--- a/lisp/term/linux.el
+++ b/lisp/term/linux.el
@@ -9,13 +9,15 @@
;; It can't really display underlines.
(tty-no-underline)
+ (condition-case nil (t-mouse-mode 1)
+ (error nil))
+
;; Make Latin-1 input characters work, too.
;; Meta will continue to work, because the kernel
;; turns that into Escape.
- (let ((value (current-input-mode)))
- ;; The third arg only matters in that it is not t or nil.
- (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value))))
+ ;; The arg only matters in that it is not t or nil.
+ (set-input-meta-mode 'iso-latin-1))
;;; arch-tag: 5d0c4f63-739b-4862-abf3-041fe42adb8f
;;; linux.el ends here