Commit a27f97ee authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(viper-mouse-search-key, viper-mouse-insert-key): Fix customize type.

parent eabbaad8
......@@ -607,25 +607,35 @@ bindings in the Viper manual."
(defcustom viper-mouse-search-key '(meta shift 1)
"*Key used to click-search in Viper.
Must be a list that specifies the mouse button and modifiers. The supported
modifiers are `meta', `shift', and `control'. For instance, `(meta shift 1)'
means that holding the meta and shift keys down and clicking on a word with
mouse button 1 will initiate search for that word in the buffer that was
current just before the click. This buffer may be different from the one where
the click occurred."
:type 'list
This must be a list that specifies the mouse button and modifiers.
The supported modifiers are `meta', `shift', and `control'.
For instance, `(meta shift 1)' means that holding the meta and shift
keys down and clicking on a word with mouse button 1
will search for that word in the buffer that was current before the click.
This buffer may be different from the one where the click occurred."
;; This does not work
;; :type '(list (set :inline meta shift control)
;; integer)
;; This doesn't work either.
;; :type '(set meta shift control 1 2 3)
:type 'sexp
:set 'viper-reset-mouse-search-key
:group 'viper-mouse)
(defcustom viper-mouse-insert-key '(meta shift 2)
"*Key used to click-insert in Viper.
Must be a list that specifies the mouse button and modifiers. The supported
modifiers are `meta', `shift', and `control'. For instance, `(meta shift 2)'
means that holding the meta and shift keys down and clicking on a word with
mouse button 2 will insert that word at the cursor in the buffer that was
current just before the click. This buffer may be different from the one where
the click occurred."
:type 'list
Must be a list that specifies the mouse button and modifiers.
The supported modifiers are `meta', `shift', and `control'.
For instance, `(meta shift 2)' means that holding the meta and shift keys
down, and clicking on a word with mouse button 2, will insert that word
at the cursor in the buffer that was current just before the click.
This buffer may be different from the one where the click occurred."
;; This does not work.
;; :type '(list (set :inline meta shift control)
;; integer)
;; This doesn't work either.
;; :type '(set meta shift control 1 2 3)
:type 'sexp
:set 'viper-reset-mouse-insert-key
:group 'viper-mouse)
......
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