Adapt to deprecated variable

This commit is contained in:
Case Duckworth 2021-05-21 08:34:52 -05:00
parent 2edbc01d87
commit df1f255780
1 changed files with 9 additions and 4 deletions

13
init.el
View File

@ -99,14 +99,19 @@
(when (acdw/system :work)
(add-to-list 'exec-path "C:/Program Files/Mozilla Firefox"))
(setq-default browse-url-browser-function ; can be alist (regex . function)
'(("." . eww-browse-url))
browse-url-secondary-browser-function
(setq-default browse-url-secondary-browser-function
(if (executable-find "firefox") ; prefer Firefox
'browse-url-firefox
'browse-url-default-browser)
browse-url-new-window-flag t
browse-url-firefox-new-window-is-tab t))
browse-url-firefox-new-window-is-tab t)
;; `browse-url-browser-function' as an alist is deprecated in Emacs 28 for
;; `browse-url-handlers'.
(set-default (if (version<= emacs-version "28")
'browse-url-browser-function
'browse-url-handlers)
'(("." . eww-browse-url))))
(setup buffers
(:global "C-x k" acdw/kill-a-buffer))