Newbie question: sharing M-TAB binding between flyspell and bbdb

Newbie question: sharing M-TAB binding between flyspell and bbdb

[Thomas Hunter]

I would like to make my M-TAB key act as bbdb-complete-name when I am
in the header in a message file but as flyspell-auto-correct-word when
I am elsewhere in the buffer.  Would any of you be willing to offer me
an elegant way to do this?

Thanks!

tjh

-- 

Re: Newbie question: sharing M-TAB binding between flyspell and bbdb

[Michael Slass]

Thomas Hunter <thunter1@swarthmore.edu> writes:

>I would like to make my M-TAB key act as bbdb-complete-name when I am
>in the header in a message file but as flyspell-auto-correct-word when
>I am elsewhere in the buffer.  Would any of you be willing to offer me
>an elegant way to do this?
>
>Thanks!
>
>tjh
>
>-- 
>

I'm guessing you want this when you're composing a message.
I don't have BBDB installed, so I can't test that part, but the
"Am I in a header?" portion works fine.

------------------------- cut here -------------------------

;; create a function that does one or the other
;; depending on your position in the buffer
(defun bbdb-complete-or-flyspell-auto-correct ()
  "`bbdb-complete-name' in msg header, `flyspell-auto-correct-word' otherwise"
  (interactive)
  (if (<= (point) (mail-header-end))
      (bbdb-complete-name)
    (flyspell-auto-correct-word)))


;; add a binding of the new function to
;; message-mode-hook
(add-hook
 'message-mode-hook
 (lambda ()
   (define-key
     message-mode-map
     (kbd "M-<tab>")
     'bbdb-complete-or-flyspell-auto-correct)))

------------------------- cut here -------------------------


Lemme know if it works.

-- 
Mike Slass