diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-02-24 04:44:19 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-02-24 04:44:19 +0000 |
| commit | cb92c1504455a432e4045d26f407e40256d84a4c (patch) | |
| tree | 06a7b08df9e3aea4053fb1bef7c88c3f65641846 /lisp | |
| parent | 2c7d1565548e2cabc2a5f5f8a226b871bedbdcb1 (diff) | |
| download | emacs-cb92c1504455a432e4045d26f407e40256d84a4c.tar.gz emacs-cb92c1504455a432e4045d26f407e40256d84a4c.tar.bz2 emacs-cb92c1504455a432e4045d26f407e40256d84a4c.zip | |
(flyspell-use-meta-tab): Add a custom :set function. (Bug#2429)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/textmodes/flyspell.el | 9 |
2 files changed, 11 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 99b3bd7f293..fad9ebecc17 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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. diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 70fd05aaf37..4b9121de94a 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el @@ -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 ?\;)] |