   (let ((map (make-sparse-keymap)))
     (prog1 map
       (define-key map "q" 'elfeed-kill-buffer)
-      (define-key map "g" 'elfeed-show-refresh)))
+      (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 ()

  (elfeed-search-update)
  (run-hooks 'elfeed-search-mode-hook))

(defun elfeed-buffer ()
  (get-buffer-create "*elfeed-search*"))

(defun elfeed ()
  "Enter elfeed."
  (interactive)
  (switch-to-buffer (elfeed-buffer))
  (unless (eq major-mode 'elfeed-search-mode) (elfeed-search-mode))
  (elfeed-search-update :force))


    (goto-char (point-min))))

(defun elfeed-show-entry (entry)
  "Display ENTRY in the current buffer."
  (let ((title (elfeed-entry-title entry)))
    (switch-to-buffer (get-buffer-create (format "*elfeed %s*" title)))
    (unless (eq major-mode 'elfeed-show-mode)
