(setq goto-address-highlight-keymap
(let ((m (make-sparse-keymap)))
(define-key m (kbd "C-<mouse-1>") 'goto-address-at-point)
(setq goto-address-highlight-keymap
(let ((m (make-sparse-keymap)))
(define-key m (kbd "C-<mouse-1>") 'goto-address-at-point)