# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1179640116 0
# Node ID f273808d859e66bd37e06ba2b37e4c57d79cfb57
# Parent  315ae0b59970d607828e4e68bf2fca39343afc06
Reduce to a minor-mode macro call.
(t-mouse-mode) Remove the lighter.

diff -r 315ae0b59970 -r f273808d859e lisp/t-mouse.el
--- a/lisp/t-mouse.el	Sun May 20 05:46:31 2007 +0000
+++ b/lisp/t-mouse.el	Sun May 20 05:48:36 2007 +0000
@@ -47,8 +47,9 @@
 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)