Org-mode内のハイパーリンクで開くブラウザをGoogle Chromeに変更する

Emacs

org-modeで

[[hogehoge]]

だとか

[[hogehoge][fugafuga]]

ってするとハイパーリンクとして認識する。これで開くブラウザをちょろめにしたい

(setq browse-url-mozilla-program "google-chrome")

で完了すると思ったら無理やった

解決

上記リンクを参考に関数browse-url-chromeを作る

(defun browse-url-chrome (url &optional new-window)
  (interactive (browse-url-interactive-arg "URL: "))
  (start-process "google-chrome" nil "google-chrome"
                 url))

それをbrowse-url-browser-functionが指すようにする

(setq browse-url-browser-function 'browse-url-chrome)

追記

Emacs内のハイパーリンク全部だねこれ