     (setq elfeed-show-entry entry)
     (elfeed-show-refresh)))
 
+(defun elfeed-show-next ()
+  "Show the next item in the elfeed-search buffer."
+  (interactive)
+  (elfeed-kill-buffer)
+  (with-current-buffer (elfeed-search-buffer)
+    (call-interactively #'elfeed-search-show-entry)))
+
+(defun elfeed-show-prev ()
+  "Show the previous item in the elfeed-search buffer."
+  (interactive)
+  (with-current-buffer (elfeed-search-buffer)
+    (forward-line -2)
+    (call-interactively #'elfeed-search-show-entry)))
+
 (provide 'elfeed)
 
 ;;; elfeed.el ends here

(defun elfeed-search-show-entry (entry)
  "Display the currently selected item in a buffer."
  (interactive (list (elfeed-search-selected :ignore-region)))
  (elfeed-untag entry 'unread)
  (elfeed-search-update-entry entry)
  (forward-line)
  (elfeed-show-entry entry))

;; Helper functions


  (let ((map (make-sparse-keymap)))
    (prog1 map
      (define-key map "q" 'elfeed-kill-buffer)
      (define-key map "g" 'elfeed-show-refresh)
      (define-key map "n" 'elfeed-show-next)
      (define-key map "p" 'elfeed-show-prev)))
  "Keymap for `elfeed-show-mode'.")

(defun elfeed-show-mode ()
