diff options
-rw-r--r-- | custom/jao-custom-browse.el | 2 | ||||
-rw-r--r-- | init.el | 7 |
2 files changed, 7 insertions, 2 deletions
diff --git a/custom/jao-custom-browse.el b/custom/jao-custom-browse.el index ba47df7..0f4ae65 100644 --- a/custom/jao-custom-browse.el +++ b/custom/jao-custom-browse.el @@ -149,7 +149,7 @@ "t.com" "linkedin.com" "bigml.com" "slack.com" "zoom.us")) (defvar jao-browse--external-regexp - (format "https?://.*%s\\(/.*\\)?" + (format "https?://\\(.+\\.\\)*%s\\(/.*\\)?" (regexp-opt jao-browse-external-domains))) (defun jao-wget--regexp () @@ -1808,6 +1808,11 @@ ;; (global-set-key (kbd "s-n") #'jao-open-nnw) (global-set-key (kbd "s-t") #'jao-open-telegram) + (defun jao-safari-internal-browse () + (interactive) + (when-let ((url (jao-safari-current-url))) + (jao-browse-url-browse url))) + (transient-define-prefix jao-transient-utils () "Global operations." [["Notes" @@ -1821,7 +1826,7 @@ ("c" "view cache" doc-view-dired-cache)] ["External" ("xn" "browse NNW article" jao-nnw-browse-current-article) - ("xs" "browse safary article" jao-safari-browse-current) + ("xs" "browse safary article" jao-safari-internal-browse) ("xk" "open skim doc" jao-skim-open-current-doc) ("xe" "choose an emoji" ns-do-show-character-palette)] ["Blog" |