 (defun elfeed-search-update (&optional force)
   "Update the display to match the database."
   (interactive)
-  (with-current-buffer (elfeed-buffer)
+  (with-current-buffer (elfeed-search-buffer)
     (when (or force (< elfeed-search-last-update (elfeed-db-last-update)))
       (let ((inhibit-read-only t)
             (standard-output (current-buffer))

    (setq elfeed-show-entry entry)
    (elfeed-show-refresh)))

(provide 'elfeed)

;;; elfeed.el ends here

(defun elfeed-search-filter-read (new-filter)
  "Query for a new filter from the user."
  (interactive (list (read-from-minibuffer "Filter: " elfeed-search-filter)))
  (with-current-buffer (elfeed-search-buffer)
    (setf elfeed-search-filter new-filter)
    (elfeed-search-update :force)))

