(flyspell-use-meta-tab): Add a custom :set function. (Bug#2429)
This commit is contained in:
parent
2c7d156554
commit
cb92c15044
2 changed files with 11 additions and 1 deletions
|
@ -1,5 +1,8 @@
|
|||
2009-02-24 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* textmodes/flyspell.el (flyspell-use-meta-tab): Add a custom
|
||||
:set function. (Bug#2429)
|
||||
|
||||
* eshell/esh-util.el (eshell-parse-ange-ls): Define `name' before
|
||||
potential use.
|
||||
|
||||
|
|
|
@ -262,10 +262,17 @@ If `flyspell-large-region' is nil, all regions are treated as small."
|
|||
:group 'flyspell
|
||||
:type '(choice string (const nil)))
|
||||
|
||||
(defvar flyspell-mode-map)
|
||||
|
||||
(defcustom flyspell-use-meta-tab t
|
||||
"Non-nil means that flyspell uses M-TAB to correct word."
|
||||
:group 'flyspell
|
||||
:type 'boolean)
|
||||
:type 'boolean
|
||||
:initialize 'custom-initialize-default
|
||||
:set (lambda (sym val)
|
||||
(define-key flyspell-mode-map "\M-\t"
|
||||
(if (set sym val)
|
||||
'flyspell-auto-correct-word))))
|
||||
|
||||
(defcustom flyspell-auto-correct-binding
|
||||
[(control ?\;)]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue