2002-11-01 #
(defun browse-url-open (url &optional new-window)
(interactive (browse-url-interactive-arg “URL: “))
(start-process “open” nil
“open” url))
(setq browse-url-browser-function (function browse-url-open))
(global-set-key “¥C-xm” ‘browse-url-at-point)