Left-clicking on a link in an shr-rendered HTML article opens the link twice

[asjo@koldfront.dk (Adam Sjøgren)]

Am I the only one with this problem: If I open an HTML article in Gnus,
rendered by shr, and left-click a link, almost all the time, the link is
opened twice in my [external] browser?

What seems to happen is that first widget-button-click fires, and calls
browse-url which opens the link in my browser, and then shr-browse-url
fires, which also calls browse-url and opens the link in my browser a
second time.

Middle-clicking on the link only opens it once, but it's kind of
annoying to have to remember to middle-click.

I tried fixing it with:

  (define-key shr-map (kbd "[mouse-2]") nil)

but that was too wild a guess. Now I have this instead, which works:

  (setq shr-map
    (let ((map (make-sparse-keymap)))
      (define-key map "a" 'shr-show-alt-text)
      (define-key map "i" 'shr-browse-image)
      (define-key map "z" 'shr-zoom-image)
      (define-key map [?\t] 'shr-next-link)
      (define-key map [?\M-\t] 'shr-previous-link)
      (define-key map [follow-link] 'mouse-face)
      ; (define-key map [mouse-2] 'shr-browse-url)
      (define-key map "I" 'shr-insert-image)
      (define-key map "w" 'shr-copy-url)
      (define-key map "u" 'shr-copy-url)
      (define-key map "v" 'shr-browse-url)
      (define-key map "O" 'shr-save-contents)
      (define-key map "\r" 'shr-browse-url)
      map))

... but it seems kind of wrong?


  Best regards,

    Adam

-- 
 "I need someone to throw blue sky at me"                     Adam Sjøgren
                                                         asjo@koldfront.dk