diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2007-05-20 05:48:36 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2007-05-20 05:48:36 +0000 |
| commit | 9086c6b141004a25bba263062f7988af3adf7c76 (patch) | |
| tree | 449bd798274785dd722057434edadd568e68d2bd /lisp/t-mouse.el | |
| parent | 07fedf1e817aebab6d9de5f397ad49fd090f1c8f (diff) | |
| download | emacs-9086c6b141004a25bba263062f7988af3adf7c76.tar.gz | |
Reduce to a minor-mode macro call.
(t-mouse-mode) Remove the lighter.
Diffstat (limited to 'lisp/t-mouse.el')
| -rw-r--r-- | lisp/t-mouse.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/t-mouse.el b/lisp/t-mouse.el index 42db325176b..a780a9932c9 100644 --- a/lisp/t-mouse.el +++ b/lisp/t-mouse.el @@ -47,8 +47,9 @@ With prefix arg, turn t-mouse mode on iff arg is positive. This allows the use of the mouse when operating on a Linux console, in the same way as you can use the mouse under X11. It requires the `mev' program, part of the `gpm' utilities." - nil " Mouse" nil :global t - (unless window-system + :global t :group 'mouse + (if window-system + (error "t-mouse only works in the console on GNU/Linux") (if t-mouse-mode (progn (unless (fboundp 'term-open-connection) |