diff options
| -rw-r--r-- | eos/jao-embark.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/eos/jao-embark.el b/eos/jao-embark.el index 2450fdf..a59e241 100644 --- a/eos/jao-embark.el +++ b/eos/jao-embark.el @@ -39,7 +39,9 @@ "A regular expression matching URLs that point to video streams") (defun jao-embark-w3m-anchor () - (when-let ((url (w3m-anchor))) (cons 'url url))) + (when (not (region-active-p)) + (when-let ((url (or (w3m-anchor) w3m-current-url))) + (cons 'url url)))) (defun jao-refine-url (url) (if (string-match-p jao-embark-video-url-rx url) |