nits

1 files changed, 8 insertions, 1 deletions

diff --git a/eww.org b/eww.org
index e0b12b3..031eba4 100644
--- a/eww.org
+++ b/eww.org
@@ -106,6 +106,12 @@
 * Visiting links in a page
 
   #+begin_src emacs-lisp
+    (defun jao-eww-copy-link ()
+      (interactive)
+      (when-let (lnk (or (car (eww-links-at-point)) (eww-current-url)))
+        (message "%s" lnk)
+        (kill-new lnk)))
+
     (defun jao-eww--at-link ()
       (and (get-text-property (point) 'shr-url)
            (not (get-text-property (point) 'eww-form))))
@@ -188,6 +194,7 @@
 
       :bind (:map eww-mode-map (("b" . eww-back-url)
                                 ("B" . eww-forward-url)
+                                ("c" . jao-eww-copy-link)
                                 ("d" . eww-download)
                                 ("D" . jao-download)
                                 ("f" . eww-lnum-follow)
@@ -206,7 +213,7 @@
                                 ("w" . org-eww-copy-for-org-mode)
                                 ("W" . jao-eww-close)
                                 ("x" . jao-rss-subscribe)
-                                ("y" . eww-copy-page-url)
+                                ("y" . jao-eww-copy-link)
                                 ("C-c C-w" . jao-eww-close))))
 
   #+end_src