diff options
| author | jao <jao@gnu.org> | 2025-09-17 13:50:05 +0100 | 
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-09-17 13:50:05 +0100 | 
| commit | 02343407cef03a56f36ba838fc275614e43df074 (patch) | |
| tree | c2be42ba36583c82abb5b4c2e59baa4dfb121bcf /custom | |
| parent | 900ca515fa70cbb92bdf1125d3a5d1ef8c35e74d (diff) | |
| download | elibs-02343407cef03a56f36ba838fc275614e43df074.tar.gz elibs-02343407cef03a56f36ba838fc275614e43df074.tar.bz2  | |
browsing for mac
Diffstat (limited to 'custom')
| -rw-r--r-- | custom/jao-custom-browse.el | 30 | 
1 files changed, 14 insertions, 16 deletions
diff --git a/custom/jao-custom-browse.el b/custom/jao-custom-browse.el index 37f4c9f..2787518 100644 --- a/custom/jao-custom-browse.el +++ b/custom/jao-custom-browse.el @@ -108,7 +108,7 @@  ;;;; browse-url  (require 'browse-url) -(setq browse-url-generic-program "~/bin/firehog") +(setq browse-url-generic-program "firefox")  (defun jao-browse-with-external-browser (&rest url)    "Browse with external hogging" @@ -121,6 +121,7 @@              (jao-river-enabled (jao-river-to-ws 2))              (jao-sway-enabled (jao-sway-firefox)))        (browse-url-generic url)))) +  (setq jao-browse-url-external-function 'jao-browse-with-external-browser)  (defun jao--fln (url) @@ -177,21 +178,18 @@  (defun jao-browse-url-browse (&rest args)    (apply jao-browse-url-function args)) -(setq browse-url-handlers -      `((jao-video--url-p . jao-maybe-view-video) -        (,jao--doc-exts . jao--browse-doc) -        (,jao--see-exts . jao--see) -        ("^file://?.+\\.html?$" . ,jao-browse-url-function) -        ("^file://?" . jao--find-file-other-window) -        (,jao-browse--external-regexp . ,jao-browse-url-external-function) -        ("^https?://.*\\.gotomeeting\\.com\\.*" . browse-url-chrome) -        (,jao-browse--sound-rx . jao-browse-play-sound-url) -        (,(jao-wget--regexp) . jao-download) -        ("." . jao-browse-url-browse))) - -(when (< emacs-major-version 28) -  (setf (alist-get 'jao-video--url-p browse-url-handlers nil t) nil) -  (setq browse-url-browser-function browse-url-handlers)) +(jao-when-linux + (setq browse-url-handlers +       `((jao-video--url-p . jao-maybe-view-video) +         (,jao--doc-exts . jao--browse-doc) +         (,jao--see-exts . jao--see) +         ("^file://?.+\\.html?$" . ,jao-browse-url-function) +         ("^file://?" . jao--find-file-other-window) +         (,jao-browse--external-regexp . ,jao-browse-url-external-function) +         ("^https?://.*\\.gotomeeting\\.com\\.*" . browse-url-chrome) +         (,jao-browse--sound-rx . jao-browse-play-sound-url) +         (,(jao-wget--regexp) . jao-download) +         ("." . jao-browse-url-browse))))  ;;;; subscribe to rss using r2e  (autoload 'View-quit "view")  | 
