(flyspell-use-meta-tab): Add a custom :set function. (Bug#2429)

This commit is contained in:
Glenn Morris 2009-02-24 04:44:19 +00:00
parent 2c7d156554
commit cb92c15044
2 changed files with 11 additions and 1 deletions

View file

@ -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.

View file

@ -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 ?\;)]