         when (elfeed-entry-link entry)
         do (browse-url it)))
 
+(defun elfeed-search-yank ()
+  "Copy the selected feed item to "
+  (interactive)
+  (let* ((entry (elfeed-search-selected :ignore-region))
+         (link (and entry (elfeed-entry-link entry))))
+    (when entry
+      (message "Copied: %s" link)
+      (x-set-selection 'PRIMARY link))))
+
 (provide 'elfeed)
 
 ;;; elfeed.el ends here

      (insert "End of entries.\n")
      (goto-line line))))

(defun elfeed-search-selected ()
  "Return a list of the currently selected feeds."
  (let ((start (if (use-region-p) (region-beginning) (point)))
        (end   (if (use-region-p) (region-end) (point))))
    (loop for line from (line-number-at-pos start) to (line-number-at-pos end)
          when (nth (1- line) elfeed-search-entries)
          collect it)))

(defun elfeed-search-browse-url ()
  "Visit the current entry in your browser using `browse-url'."

    (prog1 map
      (define-key map "q" 'quit-window)
      (define-key map "g" 'elfeed-search-update)
      (define-key map "b" 'elfeed-search-browse-url)
      (define-key map "y" 'elfeed-search-yank)))
  "Keymap for elfeed-search-mode.")

(defun elfeed-search-mode ()
