網站地圖 最近更新 News ElispArea 教导

osx browse-url-browser-function

Contents

  1. Code
  2. Note

Code

(defun rcy-browse-url-default-macosx-browser (url &optional new-window)
  (interactive (browse-url-interactive-arg "URL: "))
  (let ((url
	 (if (aref (url-generic-parse-url url) 0)
	     url
	   (concat "http://" url))))
    (start-process (concat "open " url) nil "open" url)))
 
(setq browse-url-browser-function 'rcy-browse-url-default-macosx-browser)

Note

You could of course also use builtin function M-x ffap or bind it to some keys.