Binding mouse-3 to browse-url-at-point question

Binding mouse-3 to browse-url-at-point question

[Jeff Rancier]

Hello.

I easily enough bound it, via the following in my .emacs:

(global-set-key [(mouse-3)] 'browse-url-at-point)

The problem is that the point doesn't change to the line I mouse-3 click on
before I browse-url-at-point().  Of course I can click mouse-1, then
mouse-3, to acheive this, but I'd rather have mouse-3 move the point then
browse.

I did C-h k on mouse-1 and got:  mouse-drag-region (which first moves the
point), so I naively tried:

(global-set-key [(mouse-3)]
  (lambda()
    progn
    'mouse-drag-region
    'browse-url-at-point))

But got:

recursive-edit: Wrong type argument: commandp, (lambda nil progn (quote
mouse-drag-region) (quote browse-url-at-point))

Can anyone help me fix this up a bit?
--

Thanks,
Jeff

-----------------------------------------------------------------
"Live as if you were to die tomorrow.
Learn as if you were to live forever."

                                    - M.K. Gandhi

Re: Binding mouse-3 to browse-url-at-point question

[David Kastrup]

"Jeff Rancier" <jeff.rancier@softechnics.com> writes:

> Hello.
> 
> I easily enough bound it, via the following in my .emacs:
> 
> (global-set-key [(mouse-3)] 'browse-url-at-point)
> 
> The problem is that the point doesn't change to the line I mouse-3 click on
> before I browse-url-at-point().  Of course I can click mouse-1, then
> mouse-3, to acheive this, but I'd rather have mouse-3 move the point then
> browse.
> 
> I did C-h k on mouse-1 and got:  mouse-drag-region (which first moves the
> point), so I naively tried:
> 
> (global-set-key [(mouse-3)]
>   (lambda()
>     progn
>     'mouse-drag-region
>     'browse-url-at-point))
> 
> But got:
> 
> recursive-edit: Wrong type argument: commandp, (lambda nil progn (quote
> mouse-drag-region) (quote browse-url-at-point))
> 
> Can anyone help me fix this up a bit?

Commands bound to keys have to start with an (interactive ...) form.
Take a look at C-h f interactive RET, a particular letter argument
tells the keybinding that it should first move the point to the
clicked position...

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum
Email: David.Kastrup@t-online.de

Re: Binding mouse-3 to browse-url-at-point question

[Kevin Rodgers]

Jeff Rancier wrote:

> I easily enough bound it, via the following in my .emacs:
> 
> (global-set-key [(mouse-3)] 'browse-url-at-point)
> 
> The problem is that the point doesn't change to the line I mouse-3 click on
> before I browse-url-at-point().  Of course I can click mouse-1, then
> mouse-3, to acheive this, but I'd rather have mouse-3 move the point then
> browse.


Shouldn't you bind browse-url-at-mouse instead:


| browse-url-at-mouse: an interactive autoloaded Lisp function in `browse-url'.
|
| Ask a WWW browser to load a URL clicked with the mouse.
| The URL is the one around or before the position of the mouse click
| but point is not changed.  The URL is loaded according to the value of
| `browse-url-browser-function'.

-- 
Kevin Rodgers <kevinr@ihs.com>