Re: Using flyspell in Emacs on Mac OS X

[Pierre Gaston]

"D. D. Brierton" <darren@dzr-web.com> writes:

> On Wed, 09 Jul 2003 01:12:55 +0200, Eric Jacoboni wrote:
> 
> > With Mac OS, i do exactly as with other Unix : clicking with the
> > middle button popup the flyspell context menu... and i've done
> > absolutely nothing special.
> 
> Sorry, I wasn't clear enough. My friend is using an iBook *without*
> external mouse, so she has only one mouse button on her trackpad. I either
> need to find out how to simulate a mouse-2 click, or to add something to
> her .emacs to allow mouse-1 to call up the flyspell context menu.
> 
> Best, Darren

hi,

Here is a quick function to emulate the middle button (emacs)

(defun middle-click (click &optional arg)
  (interactive "e\nP")
  (let ((event (event-start click)))
    ;; handle error if the function doesn't use the prefix
    (condition-case nil
        (funcall (key-binding (vector (list 'mouse-2 event))) click arg)
      (error (funcall (key-binding (vector (list 'mouse-2 event))) click)))))

;S-mouse-3 behave like mouse-2
(global-set-key [(S-mouse-3)] 'middle-click)