diff options
| -rw-r--r-- | completion.org | 4 | ||||
| -rw-r--r-- | init.org | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/completion.org b/completion.org index d8c74d9..01ef0db 100644 --- a/completion.org +++ b/completion.org @@ -367,14 +367,14 @@ (add-to-list 'embark-target-finders #'jao-embark-targets--w3m-anchor) (defun jao-embark-url (url) - "Browse URL, externally if we're already in emacs-w3m" + "Browse URL, externally if we're already in an emacs browser." (if (derived-mode-p 'w3m-mode 'eww-mode) (jao-browse-with-external-browser url) (browse-url url))) (define-key embark-url-map (kbd "RET") #'jao-embark-url) - (define-key embark-url-map (kbd "e") #'jao-eww-browse-url) (define-key embark-url-map (kbd "f") #'browse-url-firefox) + (define-key embark-url-map (kbd "x") #'jao-rss-subscribe) (define-key embark-url-map (kbd "m") 'jao-browse-with-external-browser) #+end_src *** video url targets @@ -1494,9 +1494,9 @@ (insert "\nmaildir-mailbox = " mbox "\n\n") (save-buffer))) - (defun jao-rss-subscribe (&optional url) + (defun jao-rss-subscribe (url) "Subscribe to a given RSS URL. If URL not given, look for it." - (interactive) + (interactive "s") (let* ((url (or url (jao-url-around-point) (jao-rss--find-url) |