diff options
| author | Yuchen Pei <id@ypei.org> | 2025-01-16 09:50:31 +1100 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2025-01-16 09:50:31 +1100 |
| commit | e7d07c825a29621cd1be7d787d5e1565bc3d3513 (patch) | |
| tree | ddd1170ee525ed9a93ed067e08e1b72a860076fb /emacs/.emacs.d/init/ycp-web.el | |
| parent | d2c0eedeab4dc191eeb502af9edf589feb6633f3 (diff) | |
[emacs] web related
- fix browse-url-handlers
- generalise fetch-and-browse flows
Diffstat (limited to 'emacs/.emacs.d/init/ycp-web.el')
| -rw-r--r-- | emacs/.emacs.d/init/ycp-web.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el index 9b0bf0d..f72c609 100644 --- a/emacs/.emacs.d/init/ycp-web.el +++ b/emacs/.emacs.d/init/ycp-web.el @@ -34,6 +34,8 @@ (ignore-errors (cancel-timer url-cookie-timer)) (setq shr-cookie-policy nil) +(setq browse-url-handlers + '((stringp . browse-url-firefox))) (my-package luwak (:delay 10) @@ -332,7 +334,7 @@ . ,(lambda (url &rest _) (my-open-newscorp-au url)))) (add-to-list 'browse-url-handlers `("^https?://www.spectator.com.au\\>" . - ,(lambda (url &rest args) (my-open-spectator-au url)))) + ,(lambda (url &rest _) (my-fetch-browse-as-googlebot url)))) ) (add-to-list 'load-path (locate-user-emacs-file "lisp/servall/lisp")) |