From d2533d72680f2c14730cf8699bb2cdd18eba4365 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 13 Jul 2016 11:08:21 -0400 Subject: [PATCH] * lisp/mouse.el (mouse): Consolidate group definition here * lisp/cus-edit.el (mouse): Remove both group definitions. --- lisp/cus-edit.el | 8 -------- lisp/mouse.el | 5 +++++ 2 files changed, 5 insertions(+), 8 deletions(-) diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 60d07f9bc77..ef1274534d6 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -197,10 +197,6 @@ :link '(custom-manual "(emacs)Emulation") :group 'editing) -(defgroup mouse nil - "Mouse support." - :group 'editing) - (defgroup outlines nil "Support for hierarchical outlining." :group 'wp) @@ -406,10 +402,6 @@ "Input from the keyboard." :group 'environment) -(defgroup mouse nil - "Input from the mouse." - :group 'environment) - (defgroup menu nil "Input from the menus." :group 'environment) diff --git a/lisp/mouse.el b/lisp/mouse.el index f5953265ff0..75b13c4409c 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -34,6 +34,11 @@ ;; Indent track-mouse like progn. (put 'track-mouse 'lisp-indent-function 0) +(defgroup mouse nil + "Input from the mouse." ;; "Mouse support." + :group 'environment + :group 'editing) + (defcustom mouse-yank-at-point nil "If non-nil, mouse yank commands yank at point instead of at click." :type 'boolean -- 2.11.4.GIT