Commit d2533d72 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* lisp/mouse.el (mouse): Consolidate group definition here

* lisp/cus-edit.el (mouse): Remove both group definitions.
parent 96bd07a3
...@@ -197,10 +197,6 @@ ...@@ -197,10 +197,6 @@
:link '(custom-manual "(emacs)Emulation") :link '(custom-manual "(emacs)Emulation")
:group 'editing) :group 'editing)
(defgroup mouse nil
"Mouse support."
:group 'editing)
(defgroup outlines nil (defgroup outlines nil
"Support for hierarchical outlining." "Support for hierarchical outlining."
:group 'wp) :group 'wp)
...@@ -406,10 +402,6 @@ ...@@ -406,10 +402,6 @@
"Input from the keyboard." "Input from the keyboard."
:group 'environment) :group 'environment)
(defgroup mouse nil
"Input from the mouse."
:group 'environment)
(defgroup menu nil (defgroup menu nil
"Input from the menus." "Input from the menus."
:group 'environment) :group 'environment)
......
...@@ -34,6 +34,11 @@ ...@@ -34,6 +34,11 @@
;; Indent track-mouse like progn. ;; Indent track-mouse like progn.
(put 'track-mouse 'lisp-indent-function 0) (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 (defcustom mouse-yank-at-point nil
"If non-nil, mouse yank commands yank at point instead of at click." "If non-nil, mouse yank commands yank at point instead of at click."
:type 'boolean :type 'boolean
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment