Mercurial > emacs

comparison lisp/xt-mouse.el @ 27804:863a76e21118

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(xterm-mouse-mode): Typo.
author Dave Love <fx@gnu.org>
date Tue, 22 Feb 2000 12:00:49 +0000
parents 5b4cb85d9312
children 364478eab234
comparison
equal deleted inserted replaced
27803:5b4cb85d9312 27804:863a76e21118
161 (turn-off-xterm-mouse-tracking) 161 (turn-off-xterm-mouse-tracking)
162 (setq xterm-mouse-mode nil 162 (setq xterm-mouse-mode nil
163 mouse-position-function nil) 163 mouse-position-function nil)
164 (set-buffer-modified-p (buffer-modified-p)))) 164 (set-buffer-modified-p (buffer-modified-p))))
165 ;;Turn it on 165 ;;Turn it on
166 (unless (or window-systemxterm-mouse-mode) 166 (unless (or window-system xterm-mouse-mode)
167 (setq xterm-mouse-mode t 167 (setq xterm-mouse-mode t
168 mouse-position-function #'xterm-mouse-position-function) 168 mouse-position-function #'xterm-mouse-position-function)
169 (turn-on-xterm-mouse-tracking) 169 (turn-on-xterm-mouse-tracking)
170 (set-buffer-modified-p (buffer-modified-p))))) 170 (set-buffer-modified-p (buffer-modified-p)))))
171 171